/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / gnus / nnweb.elc.z / nnweb.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 33 |on Mon M|ar  9 13|
|00000040| 3a 30 33 3a 32 31 20 31 | 39 39 38 0a 3b 3b 3b 20 |:03:21 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 67 6e 75 73 |s-20.3/l|isp/gnus|
|000000a0| 2f 6e 6e 77 65 62 2e 65 | 6c 0a 3b 3b 3b 20 65 6d |/nnweb.e|l.;;; em|
|000000b0| 61 63 73 20 76 65 72 73 | 69 6f 6e 20 32 30 2e 34 |acs vers|ion 20.4|
|000000c0| 20 22 45 6d 65 72 61 6c | 64 22 20 58 45 6d 61 63 | "Emeral|d" XEmac|
|000000d0| 73 20 20 4c 75 63 69 64 | 2e 0a 3b 3b 3b 20 62 79 |s  Lucid|..;;; by|
|000000e0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 32 |tecomp v|ersion 2|
|000000f0| 2e 32 35 20 58 45 6d 61 | 63 73 3b 20 32 32 2d 4d |.25 XEma|cs; 22-M|
|00000100| 61 72 2d 39 36 2e 0a 3b | 3b 3b 20 6f 70 74 69 6d |ar-96..;|;; optim|
|00000110| 69 7a 61 74 69 6f 6e 20 | 69 73 20 6f 6e 2e 0a 3b |ization |is on..;|
|00000120| 3b 3b 20 74 68 69 73 20 | 66 69 6c 65 20 75 73 65 |;; this |file use|
|00000130| 73 20 6f 70 63 6f 64 65 | 73 20 77 68 69 63 68 20 |s opcode|s which |
|00000140| 64 6f 20 6e 6f 74 20 65 | 78 69 73 74 20 69 6e 20 |do not e|xist in |
|00000150| 45 6d 61 63 73 20 31 39 | 2e 0a 0a 28 69 66 20 28 |Emacs 19|...(if (|
|00000160| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 6d 61 |and (bou|ndp 'ema|
|00000170| 63 73 2d 76 65 72 73 69 | 6f 6e 29 0a 09 20 28 6f |cs-versi|on).. (o|
|00000180| 72 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |r (and (|boundp '|
|00000190| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 20 |epoch::v|ersion) |
|000001a0| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 0a |epoch::v|ersion).|
|000001b0| 09 20 20 20 20 20 28 73 | 74 72 69 6e 67 2d 6c 65 |.     (s|tring-le|
|000001c0| 73 73 70 20 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |ssp emac|s-versio|
|000001d0| 6e 20 22 32 30 22 29 29 | 29 0a 20 20 20 20 28 65 |n "20"))|).    (e|
|000001e0| 72 72 6f 72 20 22 60 6e | 6e 77 65 62 2e 65 6c 27 |rror "`n|nweb.el'|
|000001f0| 20 77 61 73 20 63 6f 6d | 70 69 6c 65 64 20 66 6f | was com|piled fo|
|00000200| 72 20 45 6d 61 63 73 20 | 32 30 22 29 29 0a 0a 28 |r Emacs |20"))..(|
|00000210| 6f 72 20 28 62 6f 75 6e | 64 70 20 27 63 75 72 72 |or (boun|dp 'curr|
|00000220| 65 6e 74 2d 6c 6f 61 64 | 2d 6c 69 73 74 29 20 28 |ent-load|-list) (|
|00000230| 73 65 74 71 20 63 75 72 | 72 65 6e 74 2d 6c 6f 61 |setq cur|rent-loa|
|00000240| 64 2d 6c 69 73 74 20 6e | 69 6c 29 29 0a 0a 0a 28 |d-list n|il))...(|
|00000250| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 21 88 c0 |byte-cod|e "..!..|
|00000260| c2 21 88 c0 c3 21 88 c0 | c4 21 88 c0 c5 21 88 c0 |.!...!..|.!...!..|
|00000270| c6 21 88 c0 c7 21 88 c8 | c9 ca 8f 88 cb cc cd c8 |.!...!..|........|
|00000280| 5c 22 c8 89 46 0e 0e 42 | 16 0e cb cf 44 0e 10 42 |\"..F..B|....D..B|
|00000290| 16 10 c8 87 22 20 5b 72 | 65 71 75 69 72 65 20 6e |...." [r|equire n|
|000002a0| 6e 6f 6f 20 6d 65 73 73 | 61 67 65 20 67 6e 75 73 |noo mess|age gnus|
|000002b0| 2d 75 74 69 6c 20 67 6e | 75 73 20 77 33 20 75 72 |-util gn|us w3 ur|
|000002c0| 6c 20 6e 6e 6d 61 69 6c | 20 6e 69 6c 20 28 62 79 |l nnmail| nil (by|
|000002d0| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 21 87 22 20 5b |te-code |"..!." [|
|000002e0| 72 65 71 75 69 72 65 20 | 77 33 2d 66 6f 72 6d 73 |require |w3-forms|
|000002f0| 5d 20 32 29 20 28 28 65 | 72 72 6f 72 29 29 20 6e |] 2) ((e|rror)) n|
|00000300| 6e 77 65 62 20 6d 61 70 | 63 61 72 20 23 5b 28 70 |nweb map|car #[(p|
|00000310| 29 20 22 08 43 87 22 20 | 5b 70 5d 20 31 5d 20 6e |) ".C." |[p] 1] n|
|00000320| 6e 6f 6f 2d 64 65 66 69 | 6e 69 74 69 6f 6e 2d 61 |noo-defi|nition-a|
|00000330| 6c 69 73 74 20 22 2a 69 | 6e 74 65 72 6e 61 6c 2d |list "*i|nternal-|
|00000340| 6e 6f 6e 2d 69 6e 69 74 | 69 61 6c 69 7a 65 64 2d |non-init|ialized-|
|00000350| 62 61 63 6b 65 6e 64 2a | 22 20 6e 6e 6f 6f 2d 73 |backend*|" nnoo-s|
|00000360| 74 61 74 65 2d 61 6c 69 | 73 74 5d 20 34 29 0a 23 |tate-ali|st] 4).#|
|00000370| 40 33 34 20 57 68 65 72 | 65 20 6e 6e 77 65 62 20 |@34 Wher|e nnweb |
|00000380| 77 69 6c 6c 20 73 61 76 | 65 20 69 74 73 20 66 69 |will sav|e its fi|
|00000390| 6c 65 73 2e 1f 0a 28 64 | 65 66 76 61 72 20 6e 6e |les...(d|efvar nn|
|000003a0| 77 65 62 2d 64 69 72 65 | 63 74 6f 72 79 20 28 6e |web-dire|ctory (n|
|000003b0| 6e 68 65 61 64 65 72 2d | 63 6f 6e 63 61 74 20 67 |nheader-|concat g|
|000003c0| 6e 75 73 2d 64 69 72 65 | 63 74 6f 72 79 20 22 6e |nus-dire|ctory "n|
|000003d0| 6e 77 65 62 2f 22 29 20 | 28 23 24 20 2e 20 38 38 |nweb/") |(#$ . 88|
|000003e0| 34 29 29 0a 28 6e 6e 6f | 6f 2d 64 65 66 69 6e 65 |4)).(nno|o-define|
|000003f0| 20 27 6e 6e 77 65 62 2d | 64 69 72 65 63 74 6f 72 | 'nnweb-|director|
|00000400| 79 20 6e 69 6c 29 0a 23 | 40 34 30 20 57 68 61 74 |y nil).#|@40 What|
|00000410| 20 73 65 61 72 63 68 20 | 65 6e 67 69 6e 65 20 74 | search |engine t|
|00000420| 79 70 65 20 69 73 20 62 | 65 69 6e 67 20 75 73 65 |ype is b|eing use|
|00000430| 64 2e 1f 0a 28 64 65 66 | 76 61 72 20 6e 6e 77 65 |d...(def|var nnwe|
|00000440| 62 2d 74 79 70 65 20 27 | 64 65 6a 61 6e 65 77 73 |b-type '|dejanews|
|00000450| 20 28 23 24 20 2e 20 31 | 30 33 36 29 29 0a 28 6e | (#$ . 1|036)).(n|
|00000460| 6e 6f 6f 2d 64 65 66 69 | 6e 65 20 27 6e 6e 77 65 |noo-defi|ne 'nnwe|
|00000470| 62 2d 74 79 70 65 20 6e | 69 6c 29 0a 23 40 32 34 |b-type n|il).#@24|
|00000480| 20 54 79 70 65 2d 64 65 | 66 69 6e 69 74 69 6f 6e | Type-de|finition|
|00000490| 20 61 6c 69 73 74 2e 1f | 0a 28 64 65 66 76 61 72 | alist..|.(defvar|
|000004a0| 20 6e 6e 77 65 62 2d 74 | 79 70 65 2d 64 65 66 69 | nnweb-t|ype-defi|
|000004b0| 6e 69 74 69 6f 6e 20 27 | 28 28 64 65 6a 61 6e 65 |nition '|((dejane|
|000004c0| 77 73 20 28 61 72 74 69 | 63 6c 65 20 2e 20 6e 6e |ws (arti|cle . nn|
|000004d0| 77 65 62 2d 64 65 6a 61 | 6e 65 77 73 2d 77 61 73 |web-deja|news-was|
|000004e0| 68 2d 61 72 74 69 63 6c | 65 29 20 28 6d 61 70 20 |h-articl|e) (map |
|000004f0| 2e 20 6e 6e 77 65 62 2d | 64 65 6a 61 6e 65 77 73 |. nnweb-|dejanews|
|00000500| 2d 63 72 65 61 74 65 2d | 6d 61 70 70 69 6e 67 29 |-create-|mapping)|
|00000510| 20 28 73 65 61 72 63 68 | 20 2e 20 6e 6e 77 65 62 | (search| . nnweb|
|00000520| 2d 64 65 6a 61 6e 65 77 | 73 2d 73 65 61 72 63 68 |-dejanew|s-search|
|00000530| 29 20 28 61 64 64 72 65 | 73 73 20 2e 20 22 68 74 |) (addre|ss . "ht|
|00000540| 74 70 3a 2f 2f 78 70 39 | 2e 64 65 6a 61 6e 65 77 |tp://xp9|.dejanew|
|00000550| 73 2e 63 6f 6d 2f 64 6e | 71 75 65 72 79 2e 78 70 |s.com/dn|query.xp|
|00000560| 22 29 20 28 69 64 65 6e | 74 69 66 69 65 72 20 2e |") (iden|tifier .|
|00000570| 20 6e 6e 77 65 62 2d 64 | 65 6a 61 6e 65 77 73 2d | nnweb-d|ejanews-|
|00000580| 69 64 65 6e 74 69 74 79 | 29 29 20 28 72 65 66 65 |identity|)) (refe|
|00000590| 72 65 6e 63 65 20 28 61 | 72 74 69 63 6c 65 20 2e |rence (a|rticle .|
|000005a0| 20 6e 6e 77 65 62 2d 72 | 65 66 65 72 65 6e 63 65 | nnweb-r|eference|
|000005b0| 2d 77 61 73 68 2d 61 72 | 74 69 63 6c 65 29 20 28 |-wash-ar|ticle) (|
|000005c0| 6d 61 70 20 2e 20 6e 6e | 77 65 62 2d 72 65 66 65 |map . nn|web-refe|
|000005d0| 72 65 6e 63 65 2d 63 72 | 65 61 74 65 2d 6d 61 70 |rence-cr|eate-map|
|000005e0| 70 69 6e 67 29 20 28 73 | 65 61 72 63 68 20 2e 20 |ping) (s|earch . |
|000005f0| 6e 6e 77 65 62 2d 72 65 | 66 65 72 65 6e 63 65 2d |nnweb-re|ference-|
|00000600| 73 65 61 72 63 68 29 20 | 28 61 64 64 72 65 73 73 |search) |(address|
|00000610| 20 2e 20 22 68 74 74 70 | 3a 2f 2f 77 77 77 2e 72 | . "http|://www.r|
|00000620| 65 66 65 72 65 6e 63 65 | 2e 63 6f 6d 2f 63 67 69 |eference|.com/cgi|
|00000630| 2d 62 69 6e 2f 70 6e 2f | 67 6f 22 29 20 28 69 64 |-bin/pn/|go") (id|
|00000640| 65 6e 74 69 66 69 65 72 | 20 2e 20 69 64 65 6e 74 |entifier| . ident|
|00000650| 69 74 79 29 29 20 28 61 | 6c 74 61 76 69 73 74 61 |ity)) (a|ltavista|
|00000660| 20 28 61 72 74 69 63 6c | 65 20 2e 20 6e 6e 77 65 | (articl|e . nnwe|
|00000670| 62 2d 61 6c 74 61 76 69 | 73 74 61 2d 77 61 73 68 |b-altavi|sta-wash|
|00000680| 2d 61 72 74 69 63 6c 65 | 29 20 28 6d 61 70 20 2e |-article|) (map .|
|00000690| 20 6e 6e 77 65 62 2d 61 | 6c 74 61 76 69 73 74 61 | nnweb-a|ltavista|
|000006a0| 2d 63 72 65 61 74 65 2d | 6d 61 70 70 69 6e 67 29 |-create-|mapping)|
|000006b0| 20 28 73 65 61 72 63 68 | 20 2e 20 6e 6e 77 65 62 | (search| . nnweb|
|000006c0| 2d 61 6c 74 61 76 69 73 | 74 61 2d 73 65 61 72 63 |-altavis|ta-searc|
|000006d0| 68 29 20 28 61 64 64 72 | 65 73 73 20 2e 20 22 68 |h) (addr|ess . "h|
|000006e0| 74 74 70 3a 2f 2f 77 77 | 77 2e 61 6c 74 61 76 69 |ttp://ww|w.altavi|
|000006f0| 73 74 61 2e 64 69 67 69 | 74 61 6c 2e 63 6f 6d 2f |sta.digi|tal.com/|
|00000700| 63 67 69 2d 62 69 6e 2f | 71 75 65 72 79 22 29 20 |cgi-bin/|query") |
|00000710| 28 69 64 20 2e 20 22 2f | 63 67 69 2d 62 69 6e 2f |(id . "/|cgi-bin/|
|00000720| 6e 65 77 73 3f 69 64 40 | 25 73 22 29 20 28 69 64 |news?id@|%s") (id|
|00000730| 65 6e 74 69 66 69 65 72 | 20 2e 20 69 64 65 6e 74 |entifier| . ident|
|00000740| 69 74 79 29 29 29 20 28 | 23 24 20 2e 20 31 31 35 |ity))) (|#$ . 115|
|00000750| 33 29 29 0a 23 40 33 36 | 20 53 65 61 72 63 68 20 |3)).#@36| Search |
|00000760| 73 74 72 69 6e 67 20 74 | 6f 20 66 65 65 64 20 74 |string t|o feed t|
|00000770| 6f 20 44 65 6a 61 4e 65 | 77 73 2e 1f 0a 28 64 65 |o DejaNe|ws...(de|
|00000780| 66 76 61 72 20 6e 6e 77 | 65 62 2d 73 65 61 72 63 |fvar nnw|eb-searc|
|00000790| 68 20 6e 69 6c 20 28 23 | 24 20 2e 20 31 38 38 31 |h nil (#|$ . 1881|
|000007a0| 29 29 0a 28 6e 6e 6f 6f | 2d 64 65 66 69 6e 65 20 |)).(nnoo|-define |
|000007b0| 27 6e 6e 77 65 62 2d 73 | 65 61 72 63 68 20 6e 69 |'nnweb-s|earch ni|
|000007c0| 6c 29 0a 23 40 33 36 20 | 4d 61 78 69 6d 75 6d 20 |l).#@36 |Maximum |
|000007d0| 6e 75 6d 62 65 72 20 6f | 66 20 68 69 74 73 20 74 |number o|f hits t|
|000007e0| 6f 20 64 69 73 70 6c 61 | 79 2e 1f 0a 28 64 65 66 |o displa|y...(def|
|000007f0| 76 61 72 20 6e 6e 77 65 | 62 2d 6d 61 78 2d 68 69 |var nnwe|b-max-hi|
|00000800| 74 73 20 31 30 30 20 28 | 23 24 20 2e 20 31 39 39 |ts 100 (|#$ . 199|
|00000810| 32 29 29 0a 28 6e 6e 6f | 6f 2d 64 65 66 69 6e 65 |2)).(nno|o-define|
|00000820| 20 27 6e 6e 77 65 62 2d | 6d 61 78 2d 68 69 74 73 | 'nnweb-|max-hits|
|00000830| 20 6e 69 6c 29 0a 23 40 | 34 31 20 57 68 65 74 68 | nil).#@|41 Wheth|
|00000840| 65 72 20 74 68 69 73 20 | 6e 6e 77 65 62 20 73 65 |er this |nnweb se|
|00000850| 72 76 65 72 20 69 73 20 | 65 70 68 65 6d 65 72 61 |rver is |ephemera|
|00000860| 6c 2e 1f 0a 28 64 65 66 | 76 61 72 20 6e 6e 77 65 |l...(def|var nnwe|
|00000870| 62 2d 65 70 68 65 6d 65 | 72 61 6c 2d 70 20 6e 69 |b-epheme|ral-p ni|
|00000880| 6c 20 28 23 24 20 2e 20 | 32 31 30 37 29 29 0a 28 |l (#$ . |2107)).(|
|00000890| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 c2 5c 22 |byte-cod|e "...\"|
|000008a0| 88 c3 c4 21 ac 82 c2 14 | c4 0d 42 15 c0 c4 c2 5c |...!....|..B....\|
|000008b0| 22 88 c3 c6 21 ac 83 c2 | 16 06 c6 0d 42 15 c0 c6 |"...!...|....B...|
|000008c0| c2 5c 22 88 c3 c7 21 ac | 83 c2 16 07 c7 0d 42 15 |.\"...!.|......B.|
|000008d0| c0 c7 c2 5c 22 88 c3 c8 | 21 ac 83 c2 16 08 c8 0d |...\"...|!.......|
|000008e0| 42 15 c0 c8 c2 5c 22 88 | c3 c9 21 ac 83 c2 16 09 |B....\".|..!.....|
|000008f0| c9 0d 42 15 c0 c9 c2 5c | 22 88 ca cb 21 87 22 20 |..B....\|"...!." |
|00000900| 5b 6e 6e 6f 6f 2d 64 65 | 66 69 6e 65 20 6e 6e 77 |[nnoo-de|fine nnw|
|00000910| 65 62 2d 65 70 68 65 6d | 65 72 61 6c 2d 70 20 6e |eb-ephem|eral-p n|
|00000920| 69 6c 20 62 6f 75 6e 64 | 70 20 6e 6e 77 65 62 2d |il bound|p nnweb-|
|00000930| 61 72 74 69 63 6c 65 73 | 20 63 75 72 72 65 6e 74 |articles| current|
|00000940| 2d 6c 6f 61 64 2d 6c 69 | 73 74 20 6e 6e 77 65 62 |-load-li|st nnweb|
|00000950| 2d 62 75 66 66 65 72 20 | 6e 6e 77 65 62 2d 67 72 |-buffer |nnweb-gr|
|00000960| 6f 75 70 2d 61 6c 69 73 | 74 20 6e 6e 77 65 62 2d |oup-alis|t nnweb-|
|00000970| 67 72 6f 75 70 20 6e 6e | 77 65 62 2d 68 61 73 68 |group nn|web-hash|
|00000980| 74 62 20 6e 6e 6f 6f 2d | 64 65 66 69 6e 65 2d 62 |tb nnoo-|define-b|
|00000990| 61 73 69 63 73 2d 31 20 | 6e 6e 77 65 62 5d 20 33 |asics-1 |nnweb] 3|
|000009a0| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 77 |).(defal|ias 'nnw|
|000009b0| 65 62 2d 72 65 74 72 69 | 65 76 65 2d 68 65 61 64 |eb-retri|eve-head|
|000009c0| 65 72 73 20 23 5b 28 61 | 72 74 69 63 6c 65 73 20 |ers #[(a|rticles |
|000009d0| 26 6f 70 74 69 6f 6e 61 | 6c 20 67 72 6f 75 70 20 |&optiona|l group |
|000009e0| 73 65 72 76 65 72 20 66 | 65 74 63 68 2d 6f 6c 64 |server f|etch-old|
|000009f0| 29 20 22 c0 09 5c 6e 5c | 22 88 8a 0b 71 88 c4 20 |) "..\n\|"...q.. |
|00000a00| 88 c5 89 1e 06 1e 07 0e | 08 89 41 16 08 40 89 16 |........|..A..@..|
|00000a10| 07 ab 93 0e 07 0e 09 b7 | 41 40 89 16 06 ab 68 ca |........|A@....h.|
|00000a20| 0e 06 21 88 aa 61 2b cb | 87 22 20 5b 6e 6e 77 65 |..!..a+.|." [nnwe|
|00000a30| 62 2d 70 6f 73 73 69 62 | 6c 79 2d 63 68 61 6e 67 |b-possib|ly-chang|
|00000a40| 65 2d 73 65 72 76 65 72 | 20 67 72 6f 75 70 20 73 |e-server| group s|
|00000a50| 65 72 76 65 72 20 6e 6e | 74 70 2d 73 65 72 76 65 |erver nn|tp-serve|
|00000a60| 72 2d 62 75 66 66 65 72 | 20 65 72 61 73 65 2d 62 |r-buffer| erase-b|
|00000a70| 75 66 66 65 72 20 6e 69 | 6c 20 68 65 61 64 65 72 |uffer ni|l header|
|00000a80| 20 61 72 74 69 63 6c 65 | 20 61 72 74 69 63 6c 65 | article| article|
|00000a90| 73 20 6e 6e 77 65 62 2d | 61 72 74 69 63 6c 65 73 |s nnweb-|articles|
|00000aa0| 20 6e 6e 68 65 61 64 65 | 72 2d 69 6e 73 65 72 74 | nnheade|r-insert|
|00000ab0| 2d 6e 6f 76 20 6e 6f 76 | 5d 20 33 5d 29 0a 28 6e |-nov nov|] 3]).(n|
|00000ac0| 6e 6f 6f 2d 72 65 67 69 | 73 74 65 72 2d 66 75 6e |noo-regi|ster-fun|
|00000ad0| 63 74 69 6f 6e 20 27 6e | 6e 77 65 62 2d 72 65 74 |ction 'n|nweb-ret|
|00000ae0| 72 69 65 76 65 2d 68 65 | 61 64 65 72 73 29 0a 28 |rieve-he|aders).(|
|00000af0| 64 65 66 61 6c 69 61 73 | 20 27 6e 6e 77 65 62 2d |defalias| 'nnweb-|
|00000b00| 72 65 71 75 65 73 74 2d | 73 63 61 6e 20 23 5b 28 |request-|scan #[(|
|00000b10| 26 6f 70 74 69 6f 6e 61 | 6c 20 67 72 6f 75 70 20 |&optiona|l group |
|00000b20| 73 65 72 76 65 72 29 20 | 22 c0 09 5c 6e 5c 22 88 |server) |"..\n\".|
|00000b30| c3 c4 21 15 c6 c7 21 20 | 88 0e 08 3f ad 86 c9 20 |..!...! |...?... |
|00000b40| 88 ca 09 21 87 22 20 5b | 6e 6e 77 65 62 2d 70 6f |...!." [|nnweb-po|
|00000b50| 73 73 69 62 6c 79 2d 63 | 68 61 6e 67 65 2d 73 65 |ssibly-c|hange-se|
|00000b60| 72 76 65 72 20 67 72 6f | 75 70 20 73 65 72 76 65 |rver gro|up serve|
|00000b70| 72 20 67 6e 75 73 2d 6d | 61 6b 65 2d 68 61 73 68 |r gnus-m|ake-hash|
|00000b80| 74 61 62 6c 65 20 34 30 | 39 35 20 6e 6e 77 65 62 |table 40|95 nnweb|
|00000b90| 2d 68 61 73 68 74 62 20 | 6e 6e 77 65 62 2d 64 65 |-hashtb |nnweb-de|
|00000ba0| 66 69 6e 69 74 69 6f 6e | 20 6d 61 70 20 6e 6e 77 |finition| map nnw|
|00000bb0| 65 62 2d 65 70 68 65 6d | 65 72 61 6c 2d 70 20 6e |eb-ephem|eral-p n|
|00000bc0| 6e 77 65 62 2d 77 72 69 | 74 65 2d 61 63 74 69 76 |nweb-wri|te-activ|
|00000bd0| 65 20 6e 6e 77 65 62 2d | 77 72 69 74 65 2d 6f 76 |e nnweb-|write-ov|
|00000be0| 65 72 76 69 65 77 5d 20 | 33 5d 29 0a 28 6e 6e 6f |erview] |3]).(nno|
|00000bf0| 6f 2d 72 65 67 69 73 74 | 65 72 2d 66 75 6e 63 74 |o-regist|er-funct|
|00000c00| 69 6f 6e 20 27 6e 6e 77 | 65 62 2d 72 65 71 75 65 |ion 'nnw|eb-reque|
|00000c10| 73 74 2d 73 63 61 6e 29 | 0a 28 64 65 66 61 6c 69 |st-scan)|.(defali|
|00000c20| 61 73 20 27 6e 6e 77 65 | 62 2d 72 65 71 75 65 73 |as 'nnwe|b-reques|
|00000c30| 74 2d 67 72 6f 75 70 20 | 23 5b 28 67 72 6f 75 70 |t-group |#[(group|
|00000c40| 20 26 6f 70 74 69 6f 6e | 61 6c 20 73 65 72 76 65 | &option|al serve|
|00000c50| 72 20 64 6f 6e 74 2d 63 | 68 65 63 6b 29 20 22 c0 |r dont-c|heck) ".|
|00000c60| c1 5c 6e 5c 22 88 0b ab | a6 0b 0c 6b ac a1 0d ac |.\n\"...|...k....|
|00000c70| 9e c6 0b 0e 07 5c 22 1e | 08 0b 14 c9 0e 08 38 16 |.....\".|......8.|
|00000c80| 5c 6e cb 0e 08 38 16 0c | 0e 0d ac 84 ce 0b 21 88 |\n...8..|......!.|
|00000c90| 29 0e 0f ac 85 d0 d1 d2 | 5c 22 87 0d ab 8d 0e 0f |).......|\"......|
|00000ca0| 40 40 d3 0e 0f 21 40 40 | 42 aa 87 c6 0b 0e 07 5c |@@...!@@|B......\|
|00000cb0| 22 41 40 1e 14 d0 d1 d5 | 0b 23 88 d6 d7 0e 0f 47 |"A@.....|.#.....G|
|00000cc0| 0e 14 40 0e 14 41 0b 25 | 29 87 22 20 5b 6e 6e 77 |..@..A.%|)." [nnw|
|00000cd0| 65 62 2d 70 6f 73 73 69 | 62 6c 79 2d 63 68 61 6e |eb-possi|bly-chan|
|00000ce0| 67 65 2d 73 65 72 76 65 | 72 20 6e 69 6c 20 73 65 |ge-serve|r nil se|
|00000cf0| 72 76 65 72 20 67 72 6f | 75 70 20 6e 6e 77 65 62 |rver gro|up nnweb|
|00000d00| 2d 67 72 6f 75 70 20 6e | 6e 77 65 62 2d 65 70 68 |-group n|nweb-eph|
|00000d10| 65 6d 65 72 61 6c 2d 70 | 20 61 73 73 6f 63 20 6e |emeral-p| assoc n|
|00000d20| 6e 77 65 62 2d 67 72 6f | 75 70 2d 61 6c 69 73 74 |nweb-gro|up-alist|
|00000d30| 20 69 6e 66 6f 20 32 20 | 6e 6e 77 65 62 2d 74 79 | info 2 |nnweb-ty|
|00000d40| 70 65 20 33 20 6e 6e 77 | 65 62 2d 73 65 61 72 63 |pe 3 nnw|eb-searc|
|00000d50| 68 20 64 6f 6e 74 2d 63 | 68 65 63 6b 20 6e 6e 77 |h dont-c|heck nnw|
|00000d60| 65 62 2d 72 65 61 64 2d | 6f 76 65 72 76 69 65 77 |eb-read-|overview|
|00000d70| 20 6e 6e 77 65 62 2d 61 | 72 74 69 63 6c 65 73 20 | nnweb-a|rticles |
|00000d80| 6e 6e 68 65 61 64 65 72 | 2d 72 65 70 6f 72 74 20 |nnheader|-report |
|00000d90| 6e 6e 77 65 62 20 22 4e | 6f 20 6d 61 74 63 68 69 |nnweb "N|o matchi|
|00000da0| 6e 67 20 61 72 74 69 63 | 6c 65 73 22 20 6c 61 73 |ng artic|les" las|
|00000db0| 74 20 61 63 74 69 76 65 | 20 22 4f 70 65 6e 65 64 |t active| "Opened|
|00000dc0| 20 67 72 6f 75 70 20 25 | 73 22 20 6e 6e 68 65 61 | group %|s" nnhea|
|00000dd0| 64 65 72 2d 69 6e 73 65 | 72 74 20 22 32 31 31 20 |der-inse|rt "211 |
|00000de0| 25 64 20 25 64 20 25 64 | 20 25 73 5c 6e 22 5d 20 |%d %d %d| %s\n"] |
|00000df0| 36 5d 29 0a 28 6e 6e 6f | 6f 2d 72 65 67 69 73 74 |6]).(nno|o-regist|
|00000e00| 65 72 2d 66 75 6e 63 74 | 69 6f 6e 20 27 6e 6e 77 |er-funct|ion 'nnw|
|00000e10| 65 62 2d 72 65 71 75 65 | 73 74 2d 67 72 6f 75 70 |eb-reque|st-group|
|00000e20| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 77 |).(defal|ias 'nnw|
|00000e30| 65 62 2d 63 6c 6f 73 65 | 2d 67 72 6f 75 70 20 23 |eb-close|-group #|
|00000e40| 5b 28 67 72 6f 75 70 20 | 26 6f 70 74 69 6f 6e 61 |[(group |&optiona|
|00000e50| 6c 20 73 65 72 76 65 72 | 29 20 22 c0 09 5c 6e 5c |l server|) "..\n\|
|00000e60| 22 88 0b 89 1c ad 8a c5 | 0c 21 ad 85 c6 c5 0c 21 |".......|.!.....!|
|00000e70| 21 29 ab 8d 8a 0b 71 88 | c7 c8 21 88 c9 0b 21 88 |!)....q.|..!...!.|
|00000e80| 29 ca 87 22 20 5b 6e 6e | 77 65 62 2d 70 6f 73 73 |).." [nn|web-poss|
|00000e90| 69 62 6c 79 2d 63 68 61 | 6e 67 65 2d 73 65 72 76 |ibly-cha|nge-serv|
|00000ea0| 65 72 20 67 72 6f 75 70 | 20 73 65 72 76 65 72 20 |er group| server |
|00000eb0| 6e 6e 77 65 62 2d 62 75 | 66 66 65 72 20 62 75 66 |nnweb-bu|ffer buf|
|00000ec0| 66 65 72 20 67 65 74 2d | 62 75 66 66 65 72 20 62 |fer get-|buffer b|
|00000ed0| 75 66 66 65 72 2d 6e 61 | 6d 65 20 73 65 74 2d 62 |uffer-na|me set-b|
|00000ee0| 75 66 66 65 72 2d 6d 6f | 64 69 66 69 65 64 2d 70 |uffer-mo|dified-p|
|00000ef0| 20 6e 69 6c 20 6b 69 6c | 6c 2d 62 75 66 66 65 72 | nil kil|l-buffer|
|00000f00| 20 74 5d 20 34 5d 29 0a | 28 6e 6e 6f 6f 2d 72 65 | t] 4]).|(nnoo-re|
|00000f10| 67 69 73 74 65 72 2d 66 | 75 6e 63 74 69 6f 6e 20 |gister-f|unction |
|00000f20| 27 6e 6e 77 65 62 2d 63 | 6c 6f 73 65 2d 67 72 6f |'nnweb-c|lose-gro|
|00000f30| 75 70 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6e |up).(def|alias 'n|
|00000f40| 6e 77 65 62 2d 72 65 71 | 75 65 73 74 2d 61 72 74 |nweb-req|uest-art|
|00000f50| 69 63 6c 65 20 23 5b 28 | 61 72 74 69 63 6c 65 20 |icle #[(|article |
|00000f60| 26 6f 70 74 69 6f 6e 61 | 6c 20 67 72 6f 75 70 20 |&optiona|l group |
|00000f70| 73 65 72 76 65 72 20 62 | 75 66 66 65 72 29 20 22 |server b|uffer) "|
|00000f80| c0 09 5c 6e 5c 22 88 8a | 0b ae 81 0c 71 88 0d 0e |..\n\"..|....q...|
|00000f90| 06 b7 41 40 89 1e 07 ad | 84 0e 07 c8 48 89 1e 09 |..A@....|....H...|
|00000fa0| ab 86 ca 0e 09 21 ac b0 | 0d 3b ad bf cb cc cd 5c |.....!..|.;.....\|
|00000fb0| 22 ad b9 cb cc 21 ce 1e | 0f 1e 10 d1 d2 0d 5c 22 |"....!..|......\"|
|00000fc0| ab 86 d3 d4 0d 5c 22 16 | 0f 0e 10 ad 8b 0e 0f ad |.....\".|........|
|00000fd0| 87 ca d5 0e 10 0d 5c 22 | 21 2a ad 93 0e 16 ac 88 |......\"|!*......|
|00000fe0| cb c5 21 20 88 d7 20 88 | d8 d9 da 0d 23 88 cd 2b |..! .. .|....#..+|
|00000ff0| 87 22 20 5b 6e 6e 77 65 | 62 2d 70 6f 73 73 69 62 |." [nnwe|b-possib|
|00001000| 6c 79 2d 63 68 61 6e 67 | 65 2d 73 65 72 76 65 72 |ly-chang|e-server|
|00001010| 20 67 72 6f 75 70 20 73 | 65 72 76 65 72 20 62 75 | group s|erver bu|
|00001020| 66 66 65 72 20 6e 6e 74 | 70 2d 73 65 72 76 65 72 |ffer nnt|p-server|
|00001030| 2d 62 75 66 66 65 72 20 | 61 72 74 69 63 6c 65 20 |-buffer |article |
|00001040| 6e 6e 77 65 62 2d 61 72 | 74 69 63 6c 65 73 20 68 |nnweb-ar|ticles h|
|00001050| 65 61 64 65 72 20 38 20 | 75 72 6c 20 6e 6e 77 65 |eader 8 |url nnwe|
|00001060| 62 2d 66 65 74 63 68 2d | 75 72 6c 20 6e 6e 77 65 |b-fetch-|url nnwe|
|00001070| 62 2d 64 65 66 69 6e 69 | 74 69 6f 6e 20 69 64 20 |b-defini|tion id |
|00001080| 74 20 6e 69 6c 20 61 72 | 74 20 66 65 74 63 68 20 |t nil ar|t fetch |
|00001090| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 22 5e 3c |string-m|atch "^<|
|000010a0| 5c 5c 28 2e 2a 5c 5c 29 | 3e 24 22 20 6d 61 74 63 |\\(.*\\)|>$" matc|
|000010b0| 68 2d 73 74 72 69 6e 67 | 20 31 20 66 6f 72 6d 61 |h-string| 1 forma|
|000010c0| 74 20 6e 6e 68 65 61 64 | 65 72 2d 63 61 6c 6c 62 |t nnhead|er-callb|
|000010d0| 61 63 6b 2d 66 75 6e 63 | 74 69 6f 6e 20 6e 6e 77 |ack-func|tion nnw|
|000010e0| 65 62 2d 64 65 63 6f 64 | 65 2d 65 6e 74 69 74 69 |eb-decod|e-entiti|
|000010f0| 65 73 20 6e 6e 68 65 61 | 64 65 72 2d 72 65 70 6f |es nnhea|der-repo|
|00001100| 72 74 20 6e 6e 77 65 62 | 20 22 46 65 74 63 68 65 |rt nnweb| "Fetche|
|00001110| 64 20 61 72 74 69 63 6c | 65 20 25 73 22 5d 20 35 |d articl|e %s"] 5|
|00001120| 5d 29 0a 28 6e 6e 6f 6f | 2d 72 65 67 69 73 74 65 |]).(nnoo|-registe|
|00001130| 72 2d 66 75 6e 63 74 69 | 6f 6e 20 27 6e 6e 77 65 |r-functi|on 'nnwe|
|00001140| 62 2d 72 65 71 75 65 73 | 74 2d 61 72 74 69 63 6c |b-reques|t-articl|
|00001150| 65 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 6e 6e |e).(defa|lias 'nn|
|00001160| 77 65 62 2d 63 6c 6f 73 | 65 2d 73 65 72 76 65 72 |web-clos|e-server|
|00001170| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 73 65 | #[(&opt|ional se|
|00001180| 72 76 65 72 29 20 22 c0 | 09 21 ab 9f 5c 6e 89 1b |rver) ".|.!..\n..|
|00001190| ad 8a c4 0b 21 ad 85 c5 | c4 0b 21 21 29 ab 8d 8a |....!...|..!!)...|
|000011a0| 5c 6e 71 88 c6 c7 21 88 | c8 5c 6e 21 88 29 c9 ca |\nq...!.|.\n!.)..|
|000011b0| 09 5c 22 87 22 20 5b 6e | 6e 77 65 62 2d 73 65 72 |.\"." [n|nweb-ser|
|000011c0| 76 65 72 2d 6f 70 65 6e | 65 64 20 73 65 72 76 65 |ver-open|ed serve|
|000011d0| 72 20 6e 6e 77 65 62 2d | 62 75 66 66 65 72 20 62 |r nnweb-|buffer b|
|000011e0| 75 66 66 65 72 20 67 65 | 74 2d 62 75 66 66 65 72 |uffer ge|t-buffer|
|000011f0| 20 62 75 66 66 65 72 2d | 6e 61 6d 65 20 73 65 74 | buffer-|name set|
|00001200| 2d 62 75 66 66 65 72 2d | 6d 6f 64 69 66 69 65 64 |-buffer-|modified|
|00001210| 2d 70 20 6e 69 6c 20 6b | 69 6c 6c 2d 62 75 66 66 |-p nil k|ill-buff|
|00001220| 65 72 20 6e 6e 6f 6f 2d | 63 6c 6f 73 65 2d 73 65 |er nnoo-|close-se|
|00001230| 72 76 65 72 20 6e 6e 77 | 65 62 5d 20 34 5d 29 0a |rver nnw|eb] 4]).|
|00001240| 28 6e 6e 6f 6f 2d 72 65 | 67 69 73 74 65 72 2d 66 |(nnoo-re|gister-f|
|00001250| 75 6e 63 74 69 6f 6e 20 | 27 6e 6e 77 65 62 2d 63 |unction |'nnweb-c|
|00001260| 6c 6f 73 65 2d 73 65 72 | 76 65 72 29 0a 28 64 65 |lose-ser|ver).(de|
|00001270| 66 61 6c 69 61 73 20 27 | 6e 6e 77 65 62 2d 72 65 |falias '|nnweb-re|
|00001280| 71 75 65 73 74 2d 6c 69 | 73 74 20 23 5b 28 26 6f |quest-li|st #[(&o|
|00001290| 70 74 69 6f 6e 61 6c 20 | 73 65 72 76 65 72 29 20 |ptional |server) |
|000012a0| 22 c0 c1 5c 6e 5c 22 88 | 8a 0b 71 88 c4 0d 21 88 |"..\n\".|..q...!.|
|000012b0| 29 c6 87 22 20 5b 6e 6e | 77 65 62 2d 70 6f 73 73 |).." [nn|web-poss|
|000012c0| 69 62 6c 79 2d 63 68 61 | 6e 67 65 2d 73 65 72 76 |ibly-cha|nge-serv|
|000012d0| 65 72 20 6e 69 6c 20 73 | 65 72 76 65 72 20 6e 6e |er nil s|erver nn|
|000012e0| 74 70 2d 73 65 72 76 65 | 72 2d 62 75 66 66 65 72 |tp-serve|r-buffer|
|000012f0| 20 6e 6e 6d 61 69 6c 2d | 67 65 6e 65 72 61 74 65 | nnmail-|generate|
|00001300| 2d 61 63 74 69 76 65 20 | 6e 6e 77 65 62 2d 67 72 |-active |nnweb-gr|
|00001310| 6f 75 70 2d 61 6c 69 73 | 74 20 74 5d 20 33 5d 29 |oup-alis|t t] 3])|
|00001320| 0a 28 6e 6e 6f 6f 2d 72 | 65 67 69 73 74 65 72 2d |.(nnoo-r|egister-|
|00001330| 66 75 6e 63 74 69 6f 6e | 20 27 6e 6e 77 65 62 2d |function| 'nnweb-|
|00001340| 72 65 71 75 65 73 74 2d | 6c 69 73 74 29 0a 28 64 |request-|list).(d|
|00001350| 65 66 61 6c 69 61 73 20 | 27 6e 6e 77 65 62 2d 72 |efalias |'nnweb-r|
|00001360| 65 71 75 65 73 74 2d 75 | 70 64 61 74 65 2d 69 6e |equest-u|pdate-in|
|00001370| 66 6f 20 23 5b 28 67 72 | 6f 75 70 20 69 6e 66 6f |fo #[(gr|oup info|
|00001380| 20 26 6f 70 74 69 6f 6e | 61 6c 20 73 65 72 76 65 | &option|al serve|
|00001390| 72 29 20 22 c0 09 5c 6e | 5c 22 87 22 20 5b 6e 6e |r) "..\n|\"." [nn|
|000013a0| 77 65 62 2d 70 6f 73 73 | 69 62 6c 79 2d 63 68 61 |web-poss|ibly-cha|
|000013b0| 6e 67 65 2d 73 65 72 76 | 65 72 20 67 72 6f 75 70 |nge-serv|er group|
|000013c0| 20 73 65 72 76 65 72 5d | 20 33 5d 29 0a 28 6e 6e | server]| 3]).(nn|
|000013d0| 6f 6f 2d 72 65 67 69 73 | 74 65 72 2d 66 75 6e 63 |oo-regis|ter-func|
|000013e0| 74 69 6f 6e 20 27 6e 6e | 77 65 62 2d 72 65 71 75 |tion 'nn|web-requ|
|000013f0| 65 73 74 2d 75 70 64 61 | 74 65 2d 69 6e 66 6f 29 |est-upda|te-info)|
|00001400| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6e 6e 77 65 |.(defali|as 'nnwe|
|00001410| 62 2d 61 73 79 6e 63 68 | 72 6f 6e 6f 75 73 2d 70 |b-asynch|ronous-p|
|00001420| 20 23 5b 6e 69 6c 20 22 | c0 87 22 20 5b 74 5d 20 | #[nil "|.." [t] |
|00001430| 31 5d 29 0a 28 6e 6e 6f | 6f 2d 72 65 67 69 73 74 |1]).(nno|o-regist|
|00001440| 65 72 2d 66 75 6e 63 74 | 69 6f 6e 20 27 6e 6e 77 |er-funct|ion 'nnw|
|00001450| 65 62 2d 61 73 79 6e 63 | 68 72 6f 6e 6f 75 73 2d |eb-async|hronous-|
|00001460| 70 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 6e 6e |p).(defa|lias 'nn|
|00001470| 77 65 62 2d 72 65 71 75 | 65 73 74 2d 63 72 65 61 |web-requ|est-crea|
|00001480| 74 65 2d 67 72 6f 75 70 | 20 23 5b 28 67 72 6f 75 |te-group| #[(grou|
|00001490| 70 20 26 6f 70 74 69 6f | 6e 61 6c 20 73 65 72 76 |p &optio|nal serv|
|000014a0| 65 72 20 61 72 67 73 29 | 20 22 c0 c1 5c 6e 5c 22 |er args)| "..\n\"|
|000014b0| 88 c3 0c 21 88 0c c5 c6 | 42 0e 07 42 42 0e 08 42 |...!....|B..BB..B|
|000014c0| 16 08 c9 20 88 ca 87 22 | 20 5b 6e 6e 77 65 62 2d |... ..."| [nnweb-|
|000014d0| 70 6f 73 73 69 62 6c 79 | 2d 63 68 61 6e 67 65 2d |possibly|-change-|
|000014e0| 73 65 72 76 65 72 20 6e | 69 6c 20 73 65 72 76 65 |server n|il serve|
|000014f0| 72 20 6e 6e 77 65 62 2d | 72 65 71 75 65 73 74 2d |r nnweb-|request-|
|00001500| 64 65 6c 65 74 65 2d 67 | 72 6f 75 70 20 67 72 6f |delete-g|roup gro|
|00001510| 75 70 20 31 20 30 20 61 | 72 67 73 20 6e 6e 77 65 |up 1 0 a|rgs nnwe|
|00001520| 62 2d 67 72 6f 75 70 2d | 61 6c 69 73 74 20 6e 6e |b-group-|alist nn|
|00001530| 77 65 62 2d 77 72 69 74 | 65 2d 61 63 74 69 76 65 |web-writ|e-active|
|00001540| 20 74 5d 20 33 5d 29 0a | 28 6e 6e 6f 6f 2d 72 65 | t] 3]).|(nnoo-re|
|00001550| 67 69 73 74 65 72 2d 66 | 75 6e 63 74 69 6f 6e 20 |gister-f|unction |
|00001560| 27 6e 6e 77 65 62 2d 72 | 65 71 75 65 73 74 2d 63 |'nnweb-r|equest-c|
|00001570| 72 65 61 74 65 2d 67 72 | 6f 75 70 29 0a 28 64 65 |reate-gr|oup).(de|
|00001580| 66 61 6c 69 61 73 20 27 | 6e 6e 77 65 62 2d 72 65 |falias '|nnweb-re|
|00001590| 71 75 65 73 74 2d 64 65 | 6c 65 74 65 2d 67 72 6f |quest-de|lete-gro|
|000015a0| 75 70 20 23 5b 28 67 72 | 6f 75 70 20 26 6f 70 74 |up #[(gr|oup &opt|
|000015b0| 69 6f 6e 61 6c 20 66 6f | 72 63 65 20 73 65 72 76 |ional fo|rce serv|
|000015c0| 65 72 29 20 22 c0 09 5c | 6e 5c 22 88 0b 1c c5 c6 |er) "..\|n\".....|
|000015d0| 09 0c 5c 22 0c 5c 22 13 | 29 c7 c8 09 21 21 88 c9 |..\".\".|)...!!..|
|000015e0| 87 22 20 5b 6e 6e 77 65 | 62 2d 70 6f 73 73 69 62 |." [nnwe|b-possib|
|000015f0| 6c 79 2d 63 68 61 6e 67 | 65 2d 73 65 72 76 65 72 |ly-chang|e-server|
|00001600| 20 67 72 6f 75 70 20 73 | 65 72 76 65 72 20 6e 6e | group s|erver nn|
|00001610| 77 65 62 2d 67 72 6f 75 | 70 2d 61 6c 69 73 74 20 |web-grou|p-alist |
|00001620| 6c 69 73 74 76 61 6c 20 | 64 65 6c 71 20 61 73 73 |listval |delq ass|
|00001630| 6f 63 20 67 6e 75 73 2d | 64 65 6c 65 74 65 2d 66 |oc gnus-|delete-f|
|00001640| 69 6c 65 20 6e 6e 77 65 | 62 2d 6f 76 65 72 76 69 |ile nnwe|b-overvi|
|00001650| 65 77 2d 66 69 6c 65 20 | 74 5d 20 34 5d 29 0a 28 |ew-file |t] 4]).(|
|00001660| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 21 88 c2 |byte-cod|e "..!..|
|00001670| c3 21 87 22 20 5b 6e 6e | 6f 6f 2d 72 65 67 69 73 |.!." [nn|oo-regis|
|00001680| 74 65 72 2d 66 75 6e 63 | 74 69 6f 6e 20 6e 6e 77 |ter-func|tion nnw|
|00001690| 65 62 2d 72 65 71 75 65 | 73 74 2d 64 65 6c 65 74 |eb-reque|st-delet|
|000016a0| 65 2d 67 72 6f 75 70 20 | 6e 6e 6f 6f 2d 64 65 66 |e-group |nnoo-def|
|000016b0| 69 6e 65 2d 73 6b 65 6c | 65 74 6f 6e 2d 31 20 6e |ine-skel|eton-1 n|
|000016c0| 6e 77 65 62 5d 20 32 29 | 0a 23 40 34 37 20 52 65 |nweb] 2)|.#@47 Re|
|000016d0| 61 64 20 74 68 65 20 6f | 76 65 72 76 69 65 77 20 |ad the o|verview |
|000016e0| 6f 66 20 47 52 4f 55 50 | 20 61 6e 64 20 62 75 69 |of GROUP| and bui|
|000016f0| 6c 64 20 74 68 65 20 6d | 61 70 2e 1f 0a 28 64 65 |ld the m|ap...(de|
|00001700| 66 61 6c 69 61 73 20 27 | 6e 6e 77 65 62 2d 72 65 |falias '|nnweb-re|
|00001710| 61 64 2d 6f 76 65 72 76 | 69 65 77 20 23 5b 28 67 |ad-overv|iew #[(g|
|00001720| 72 6f 75 70 29 20 22 c0 | c1 5c 6e 21 21 ad f8 8a |roup) ".|.\n!!...|
|00001730| c3 1c c5 1e 06 c7 c8 c9 | 21 21 71 1e 5c 6e c3 1e |........|!!q.\n..|
|00001740| 0b cc 8e cd c1 5c 6e 21 | 21 88 65 62 88 c3 1e 0e |.....\n!|!.eb....|
|00001750| 6d 3f ad a0 cf 20 16 0e | d0 79 88 0e 0e d1 48 0e |m?... ..|.y....H.|
|00001760| 0e 89 d2 48 45 0e 13 42 | 16 13 d4 0e 0e 0e 13 40 |...HE..B|.......@|
|00001770| 5c 22 88 aa 5c 5c 29 16 | 0b 0c ac 84 0e 0b aa a9 |\"..\\).|........|
|00001780| 0c d5 61 ab 88 0e 5c 6e | 71 88 d6 20 aa 9c 0e 5c |..a...\n|q.. ...\|
|00001790| 6e 71 88 d7 d8 0c 21 21 | ac 87 d9 d8 0c 21 d5 5c |nq....!!|.....!.\|
|000017a0| 22 88 da 65 64 0c c3 db | 25 88 0e 0b 2e 06 87 22 |"..ed...|%......"|
|000017b0| 20 5b 66 69 6c 65 2d 65 | 78 69 73 74 73 2d 70 20 | [file-e|xists-p |
|000017c0| 6e 6e 77 65 62 2d 6f 76 | 65 72 76 69 65 77 2d 66 |nnweb-ov|erview-f|
|000017d0| 69 6c 65 20 67 72 6f 75 | 70 20 6e 69 6c 20 74 65 |ile grou|p nil te|
|000017e0| 6d 70 2d 66 69 6c 65 20 | 66 75 6e 64 61 6d 65 6e |mp-file |fundamen|
|000017f0| 74 61 6c 2d 6d 6f 64 65 | 20 64 65 66 61 75 6c 74 |tal-mode| default|
|00001800| 2d 6d 61 6a 6f 72 2d 6d | 6f 64 65 20 67 65 74 2d |-major-m|ode get-|
|00001810| 62 75 66 66 65 72 2d 63 | 72 65 61 74 65 20 67 65 |buffer-c|reate ge|
|00001820| 6e 65 72 61 74 65 2d 6e | 65 77 2d 62 75 66 66 65 |nerate-n|ew-buffe|
|00001830| 72 2d 6e 61 6d 65 20 22 | 20 2a 6e 6e 68 65 61 64 |r-name "| *nnhead|
|00001840| 65 72 20 74 65 6d 70 2a | 22 20 74 65 6d 70 2d 62 |er temp*|" temp-b|
|00001850| 75 66 66 65 72 20 74 65 | 6d 70 2d 72 65 73 75 6c |uffer te|mp-resul|
|00001860| 74 73 20 28 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |ts ((byt|e-code "|
|00001870| c0 09 21 ab 84 c2 09 21 | 88 c0 87 22 20 5b 62 75 |..!....!|..." [bu|
|00001880| 66 66 65 72 2d 6e 61 6d | 65 20 74 65 6d 70 2d 62 |ffer-nam|e temp-b|
|00001890| 75 66 66 65 72 20 6b 69 | 6c 6c 2d 62 75 66 66 65 |uffer ki|ll-buffe|
|000018a0| 72 5d 20 32 29 29 20 6e | 6e 68 65 61 64 65 72 2d |r] 2)) n|nheader-|
|000018b0| 69 6e 73 65 72 74 2d 66 | 69 6c 65 2d 63 6f 6e 74 |insert-f|ile-cont|
|000018c0| 65 6e 74 73 20 68 65 61 | 64 65 72 20 6e 6e 68 65 |ents hea|der nnhe|
|000018d0| 61 64 65 72 2d 70 61 72 | 73 65 2d 6e 6f 76 20 31 |ader-par|se-nov 1|
|000018e0| 20 30 20 38 20 6e 6e 77 | 65 62 2d 61 72 74 69 63 | 0 8 nnw|eb-artic|
|000018f0| 6c 65 73 20 6e 6e 77 65 | 62 2d 73 65 74 2d 68 61 |les nnwe|b-set-ha|
|00001900| 73 68 74 62 20 74 20 62 | 75 66 66 65 72 2d 73 74 |shtb t b|uffer-st|
|00001910| 72 69 6e 67 20 66 69 6c | 65 2d 64 69 72 65 63 74 |ring fil|e-direct|
|00001920| 6f 72 79 2d 70 20 66 69 | 6c 65 2d 6e 61 6d 65 2d |ory-p fi|le-name-|
|00001930| 64 69 72 65 63 74 6f 72 | 79 20 6d 61 6b 65 2d 64 |director|y make-d|
|00001940| 69 72 65 63 74 6f 72 79 | 20 77 72 69 74 65 2d 72 |irectory| write-r|
|00001950| 65 67 69 6f 6e 20 6e 6f | 6d 65 73 67 5d 20 36 20 |egion no|mesg] 6 |
|00001960| 28 23 24 20 2e 20 35 38 | 33 38 29 5d 29 0a 23 40 |(#$ . 58|38)]).#@|
|00001970| 33 36 20 57 72 69 74 65 | 20 74 68 65 20 6f 76 65 |36 Write| the ove|
|00001980| 72 76 69 65 77 20 66 69 | 6c 65 20 66 6f 72 20 47 |rview fi|le for G|
|00001990| 52 4f 55 50 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ROUP...(|defalias|
|000019a0| 20 27 6e 6e 77 65 62 2d | 77 72 69 74 65 2d 6f 76 | 'nnweb-|write-ov|
|000019b0| 65 72 76 69 65 77 20 23 | 5b 28 67 72 6f 75 70 29 |erview #|[(group)|
|000019c0| 20 22 8a c0 09 21 1a c3 | 1c c5 c6 c7 21 21 71 1e | "...!..|....!!q.|
|000019d0| 08 c9 1e 5c 6e cb 8e 0e | 0c 1e 0d 0e 0d ad 8e ce |...\n...|........|
|000019e0| 0e 0d 89 41 16 0d 40 41 | 40 21 88 aa 6e 29 16 5c |...A..@A|@!..n).\|
|000019f0| 6e 5c 6e ac 84 0e 5c 6e | aa a9 5c 6e cf 61 ab 88 |n\n...\n|..\n.a..|
|00001a00| 0e 08 71 88 d0 20 aa 9c | 0e 08 71 88 d1 d2 5c 6e |..q.. ..|..q...\n|
|00001a10| 21 21 ac 87 d3 d2 5c 6e | 21 cf 5c 22 88 d4 65 64 |!!....\n|!.\"..ed|
|00001a20| 5c 6e c9 d5 25 88 0e 5c | 6e 2e 06 87 22 20 5b 6e |\n..%..\|n..." [n|
|00001a30| 6e 77 65 62 2d 6f 76 65 | 72 76 69 65 77 2d 66 69 |nweb-ove|rview-fi|
|00001a40| 6c 65 20 67 72 6f 75 70 | 20 74 65 6d 70 2d 66 69 |le group| temp-fi|
|00001a50| 6c 65 20 66 75 6e 64 61 | 6d 65 6e 74 61 6c 2d 6d |le funda|mental-m|
|00001a60| 6f 64 65 20 64 65 66 61 | 75 6c 74 2d 6d 61 6a 6f |ode defa|ult-majo|
|00001a70| 72 2d 6d 6f 64 65 20 67 | 65 74 2d 62 75 66 66 65 |r-mode g|et-buffe|
|00001a80| 72 2d 63 72 65 61 74 65 | 20 67 65 6e 65 72 61 74 |r-create| generat|
|00001a90| 65 2d 6e 65 77 2d 62 75 | 66 66 65 72 2d 6e 61 6d |e-new-bu|ffer-nam|
|00001aa0| 65 20 22 20 2a 6e 6e 68 | 65 61 64 65 72 20 74 65 |e " *nnh|eader te|
|00001ab0| 6d 70 2a 22 20 74 65 6d | 70 2d 62 75 66 66 65 72 |mp*" tem|p-buffer|
|00001ac0| 20 6e 69 6c 20 74 65 6d | 70 2d 72 65 73 75 6c 74 | nil tem|p-result|
|00001ad0| 73 20 28 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |s ((byte|-code ".|
|00001ae0| 09 21 ab 84 c2 09 21 88 | c0 87 22 20 5b 62 75 66 |.!....!.|.." [buf|
|00001af0| 66 65 72 2d 6e 61 6d 65 | 20 74 65 6d 70 2d 62 75 |fer-name| temp-bu|
|00001b00| 66 66 65 72 20 6b 69 6c | 6c 2d 62 75 66 66 65 72 |ffer kil|l-buffer|
|00001b10| 5d 20 32 29 29 20 6e 6e | 77 65 62 2d 61 72 74 69 |] 2)) nn|web-arti|
|00001b20| 63 6c 65 73 20 61 72 74 | 69 63 6c 65 73 20 6e 6e |cles art|icles nn|
|00001b30| 68 65 61 64 65 72 2d 69 | 6e 73 65 72 74 2d 6e 6f |header-i|nsert-no|
|00001b40| 76 20 74 20 62 75 66 66 | 65 72 2d 73 74 72 69 6e |v t buff|er-strin|
|00001b50| 67 20 66 69 6c 65 2d 64 | 69 72 65 63 74 6f 72 79 |g file-d|irectory|
|00001b60| 2d 70 20 66 69 6c 65 2d | 6e 61 6d 65 2d 64 69 72 |-p file-|name-dir|
|00001b70| 65 63 74 6f 72 79 20 6d | 61 6b 65 2d 64 69 72 65 |ectory m|ake-dire|
|00001b80| 63 74 6f 72 79 20 77 72 | 69 74 65 2d 72 65 67 69 |ctory wr|ite-regi|
|00001b90| 6f 6e 20 6e 6f 6d 65 73 | 67 5d 20 36 20 28 23 24 |on nomes|g] 6 (#$|
|00001ba0| 20 2e 20 36 35 31 35 29 | 5d 29 0a 28 64 65 66 61 | . 6515)|]).(defa|
|00001bb0| 6c 69 61 73 20 27 6e 6e | 77 65 62 2d 73 65 74 2d |lias 'nn|web-set-|
|00001bc0| 68 61 73 68 74 62 20 23 | 5b 28 68 65 61 64 65 72 |hashtb #|[(header|
|00001bd0| 20 64 61 74 61 29 20 22 | c0 c1 5c 6e c3 48 21 0c | data) "|..\n.H!.|
|00001be0| 5c 22 0d 4c 87 22 20 5b | 69 6e 74 65 72 6e 20 6e |\".L." [|intern n|
|00001bf0| 6e 77 65 62 2d 69 64 65 | 6e 74 69 66 69 65 72 20 |nweb-ide|ntifier |
|00001c00| 68 65 61 64 65 72 20 38 | 20 6e 6e 77 65 62 2d 68 |header 8| nnweb-h|
|00001c10| 61 73 68 74 62 20 64 61 | 74 61 5d 20 34 5d 29 0a |ashtb da|ta] 4]).|
|00001c20| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 6e 77 65 62 |(defalia|s 'nnweb|
|00001c30| 2d 67 65 74 2d 68 61 73 | 68 74 62 20 23 5b 28 75 |-get-has|htb #[(u|
|00001c40| 72 6c 29 20 22 c0 c1 5c | 6e 21 0b 5c 22 4a 87 22 |rl) "..\|n!.\"J."|
|00001c50| 20 5b 69 6e 74 65 72 6e | 2d 73 6f 66 74 20 6e 6e | [intern|-soft nn|
|00001c60| 77 65 62 2d 69 64 65 6e | 74 69 66 69 65 72 20 75 |web-iden|tifier u|
|00001c70| 72 6c 20 6e 6e 77 65 62 | 2d 68 61 73 68 74 62 5d |rl nnweb|-hashtb]|
|00001c80| 20 33 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 3]).(de|falias '|
|00001c90| 6e 6e 77 65 62 2d 69 64 | 65 6e 74 69 66 69 65 72 |nnweb-id|entifier|
|00001ca0| 20 23 5b 28 69 64 65 6e | 74 29 20 22 c0 c1 21 5c | #[(iden|t) "..!\|
|00001cb0| 6e 21 87 22 20 5b 6e 6e | 77 65 62 2d 64 65 66 69 |n!." [nn|web-defi|
|00001cc0| 6e 69 74 69 6f 6e 20 69 | 64 65 6e 74 69 66 69 65 |nition i|dentifie|
|00001cd0| 72 20 69 64 65 6e 74 5d | 20 32 5d 29 0a 23 40 34 |r ident]| 2]).#@4|
|00001ce0| 38 20 52 65 74 75 72 6e | 20 74 68 65 20 6e 61 6d |8 Return| the nam|
|00001cf0| 65 20 6f 66 20 74 68 65 | 20 6f 76 65 72 76 69 65 |e of the| overvie|
|00001d00| 77 20 66 69 6c 65 20 6f | 66 20 47 52 4f 55 50 2e |w file o|f GROUP.|
|00001d10| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 77 |..(defal|ias 'nnw|
|00001d20| 65 62 2d 6f 76 65 72 76 | 69 65 77 2d 66 69 6c 65 |eb-overv|iew-file|
|00001d30| 20 23 5b 28 67 72 6f 75 | 70 29 20 22 c0 09 5c 6e | #[(grou|p) "..\n|
|00001d40| c3 23 87 22 20 5b 6e 6e | 68 65 61 64 65 72 2d 63 |.#." [nn|header-c|
|00001d50| 6f 6e 63 61 74 20 6e 6e | 77 65 62 2d 64 69 72 65 |oncat nn|web-dire|
|00001d60| 63 74 6f 72 79 20 67 72 | 6f 75 70 20 22 2e 6f 76 |ctory gr|oup ".ov|
|00001d70| 65 72 76 69 65 77 22 5d | 20 34 20 28 23 24 20 2e |erview"]| 4 (#$ .|
|00001d80| 20 37 33 39 34 29 5d 29 | 0a 23 40 32 33 20 53 61 | 7394)])|.#@23 Sa|
|00001d90| 76 65 20 74 68 65 20 61 | 63 74 69 76 65 20 66 69 |ve the a|ctive fi|
|00001da0| 6c 65 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |le...(de|falias '|
|00001db0| 6e 6e 77 65 62 2d 77 72 | 69 74 65 2d 61 63 74 69 |nnweb-wr|ite-acti|
|00001dc0| 76 65 20 23 5b 6e 69 6c | 20 22 8a c0 09 c2 5c 22 |ve #[nil| "....\"|
|00001dd0| 1b c4 1d c6 c7 c8 21 21 | 71 1e 09 ca 1e 0b cc 8e |......!!|q.......|
|00001de0| cd ce cf d0 0e 0f 44 45 | 70 5c 22 16 0b 0b ac 84 |......DE|p\".....|
|00001df0| 0e 0b aa a9 0b d1 61 ab | 88 0e 09 71 88 d2 20 aa |......a.|...q.. .|
|00001e00| 9c 0e 09 71 88 d3 d4 0b | 21 21 ac 87 d5 d4 0b 21 |...q....|!!.....!|
|00001e10| d1 5c 22 88 d6 65 64 0b | ca d7 25 88 0e 0b 2e 06 |.\"..ed.|..%.....|
|00001e20| 87 22 20 5b 6e 6e 68 65 | 61 64 65 72 2d 63 6f 6e |." [nnhe|ader-con|
|00001e30| 63 61 74 20 6e 6e 77 65 | 62 2d 64 69 72 65 63 74 |cat nnwe|b-direct|
|00001e40| 6f 72 79 20 22 61 63 74 | 69 76 65 22 20 74 65 6d |ory "act|ive" tem|
|00001e50| 70 2d 66 69 6c 65 20 66 | 75 6e 64 61 6d 65 6e 74 |p-file f|undament|
|00001e60| 61 6c 2d 6d 6f 64 65 20 | 64 65 66 61 75 6c 74 2d |al-mode |default-|
|00001e70| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 67 65 74 2d 62 |major-mo|de get-b|
|00001e80| 75 66 66 65 72 2d 63 72 | 65 61 74 65 20 67 65 6e |uffer-cr|eate gen|
|00001e90| 65 72 61 74 65 2d 6e 65 | 77 2d 62 75 66 66 65 72 |erate-ne|w-buffer|
|00001ea0| 2d 6e 61 6d 65 20 22 20 | 2a 6e 6e 68 65 61 64 65 |-name " |*nnheade|
|00001eb0| 72 20 74 65 6d 70 2a 22 | 20 74 65 6d 70 2d 62 75 |r temp*"| temp-bu|
|00001ec0| 66 66 65 72 20 6e 69 6c | 20 74 65 6d 70 2d 72 65 |ffer nil| temp-re|
|00001ed0| 73 75 6c 74 73 20 28 28 | 62 79 74 65 2d 63 6f 64 |sults ((|byte-cod|
|00001ee0| 65 20 22 c0 09 21 ab 84 | c2 09 21 88 c0 87 22 20 |e "..!..|..!..." |
|00001ef0| 5b 62 75 66 66 65 72 2d | 6e 61 6d 65 20 74 65 6d |[buffer-|name tem|
|00001f00| 70 2d 62 75 66 66 65 72 | 20 6b 69 6c 6c 2d 62 75 |p-buffer| kill-bu|
|00001f10| 66 66 65 72 5d 20 32 29 | 29 20 70 72 69 6e 31 20 |ffer] 2)|) prin1 |
|00001f20| 73 65 74 71 20 6e 6e 77 | 65 62 2d 67 72 6f 75 70 |setq nnw|eb-group|
|00001f30| 2d 61 6c 69 73 74 20 71 | 75 6f 74 65 20 74 20 62 |-alist q|uote t b|
|00001f40| 75 66 66 65 72 2d 73 74 | 72 69 6e 67 20 66 69 6c |uffer-st|ring fil|
|00001f50| 65 2d 64 69 72 65 63 74 | 6f 72 79 2d 70 20 66 69 |e-direct|ory-p fi|
|00001f60| 6c 65 2d 6e 61 6d 65 2d | 64 69 72 65 63 74 6f 72 |le-name-|director|
|00001f70| 79 20 6d 61 6b 65 2d 64 | 69 72 65 63 74 6f 72 79 |y make-d|irectory|
|00001f80| 20 77 72 69 74 65 2d 72 | 65 67 69 6f 6e 20 6e 6f | write-r|egion no|
|00001f90| 6d 65 73 67 5d 20 36 20 | 28 23 24 20 2e 20 37 35 |mesg] 6 |(#$ . 75|
|00001fa0| 36 36 29 5d 29 0a 23 40 | 32 33 20 52 65 61 64 20 |66)]).#@|23 Read |
|00001fb0| 74 68 65 20 61 63 74 69 | 76 65 20 66 69 6c 65 2e |the acti|ve file.|
|00001fc0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 77 |..(defal|ias 'nnw|
|00001fd0| 65 62 2d 72 65 61 64 2d | 61 63 74 69 76 65 20 23 |eb-read-|active #|
|00001fe0| 5b 6e 69 6c 20 22 c0 c1 | 5c 6e c3 5c 22 c4 89 89 |[nil "..|\n.\"...|
|00001ff0| 24 87 22 20 5b 6c 6f 61 | 64 20 6e 6e 68 65 61 64 |$." [loa|d nnhead|
|00002000| 65 72 2d 63 6f 6e 63 61 | 74 20 6e 6e 77 65 62 2d |er-conca|t nnweb-|
|00002010| 64 69 72 65 63 74 6f 72 | 79 20 22 61 63 74 69 76 |director|y "activ|
|00002020| 65 22 20 74 5d 20 35 20 | 28 23 24 20 2e 20 38 31 |e" t] 5 |(#$ . 81|
|00002030| 30 37 29 5d 29 0a 23 40 | 33 32 20 52 65 74 75 72 |07)]).#@|32 Retur|
|00002040| 6e 20 74 68 65 20 64 65 | 66 69 6e 69 74 69 6f 6e |n the de|finition|
|00002050| 20 6f 66 20 54 59 50 45 | 2e 1f 0a 28 64 65 66 61 | of TYPE|...(defa|
|00002060| 6c 69 61 73 20 27 6e 6e | 77 65 62 2d 64 65 66 69 |lias 'nn|web-defi|
|00002070| 6e 69 74 69 6f 6e 20 23 | 5b 28 74 79 70 65 20 26 |nition #|[(type &|
|00002080| 6f 70 74 69 6f 6e 61 6c | 20 6e 6f 65 72 72 6f 72 |optional| noerror|
|00002090| 29 20 22 08 09 5c 6e b7 | b7 41 89 1b ac 88 0c ac |) "..\n.|.A......|
|000020a0| 85 c5 c6 08 5c 22 88 0b | 29 87 22 20 5b 74 79 70 |....\"..|)." [typ|
|000020b0| 65 20 6e 6e 77 65 62 2d | 74 79 70 65 20 6e 6e 77 |e nnweb-|type nnw|
|000020c0| 65 62 2d 74 79 70 65 2d | 64 65 66 69 6e 69 74 69 |eb-type-|definiti|
|000020d0| 6f 6e 20 64 65 66 20 6e | 6f 65 72 72 6f 72 20 65 |on def n|oerror e|
|000020e0| 72 72 6f 72 20 22 55 6e | 64 65 66 69 6e 65 64 20 |rror "Un|defined |
|000020f0| 64 65 66 69 6e 69 74 69 | 6f 6e 20 25 73 22 5d 20 |definiti|on %s"] |
|00002100| 34 20 28 23 24 20 2e 20 | 38 32 35 31 29 5d 29 0a |4 (#$ . |8251)]).|
|00002110| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 6e 77 65 62 |(defalia|s 'nnweb|
|00002120| 2d 70 6f 73 73 69 62 6c | 79 2d 63 68 61 6e 67 65 |-possibl|y-change|
|00002130| 2d 73 65 72 76 65 72 20 | 23 5b 28 26 6f 70 74 69 |-server |#[(&opti|
|00002140| 6f 6e 61 6c 20 67 72 6f | 75 70 20 73 65 72 76 65 |onal gro|up serve|
|00002150| 72 29 20 22 c0 09 21 88 | 09 ab 89 c2 09 21 ac 84 |r) "..!.|.....!..|
|00002160| c3 09 21 88 0c ac 83 c5 | 20 88 0e 06 ad 93 0e 07 |..!.....| .......|
|00002170| 3f ad 8e 0e 06 0e 08 6b | 3f ad 86 c9 0e 06 ca cb |?......k|?.......|
|00002180| 23 87 22 20 5b 6e 6e 77 | 65 62 2d 69 6e 69 74 20 |#." [nnw|eb-init |
|00002190| 73 65 72 76 65 72 20 6e | 6e 77 65 62 2d 73 65 72 |server n|nweb-ser|
|000021a0| 76 65 72 2d 6f 70 65 6e | 65 64 20 6e 6e 77 65 62 |ver-open|ed nnweb|
|000021b0| 2d 6f 70 65 6e 2d 73 65 | 72 76 65 72 20 6e 6e 77 |-open-se|rver nnw|
|000021c0| 65 62 2d 67 72 6f 75 70 | 2d 61 6c 69 73 74 20 6e |eb-group|-alist n|
|000021d0| 6e 77 65 62 2d 72 65 61 | 64 2d 61 63 74 69 76 65 |nweb-rea|d-active|
|000021e0| 20 67 72 6f 75 70 20 6e | 6e 77 65 62 2d 65 70 68 | group n|nweb-eph|
|000021f0| 65 6d 65 72 61 6c 2d 70 | 20 6e 6e 77 65 62 2d 67 |emeral-p| nnweb-g|
|00002200| 72 6f 75 70 20 6e 6e 77 | 65 62 2d 72 65 71 75 65 |roup nnw|eb-reque|
|00002210| 73 74 2d 67 72 6f 75 70 | 20 6e 69 6c 20 74 5d 20 |st-group| nil t] |
|00002220| 34 5d 29 0a 23 40 33 30 | 20 49 6e 69 74 69 61 6c |4]).#@30| Initial|
|00002230| 69 7a 65 20 62 75 66 66 | 65 72 73 20 61 6e 64 20 |ize buff|ers and |
|00002240| 73 75 63 68 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |such...(|defalias|
|00002250| 20 27 6e 6e 77 65 62 2d | 69 6e 69 74 20 23 5b 28 | 'nnweb-|init #[(|
|00002260| 73 65 72 76 65 72 29 20 | 22 08 89 19 ad 8a c2 09 |server) |".......|
|00002270| 21 ad 85 c3 c2 09 21 21 | 29 3f ad 8f 8a c4 c5 c6 |!.....!!|)?......|
|00002280| 0e 07 0e 08 0e 09 24 21 | 29 89 10 87 22 20 5b 6e |......$!|)..." [n|
|00002290| 6e 77 65 62 2d 62 75 66 | 66 65 72 20 62 75 66 66 |nweb-buf|fer buff|
|000022a0| 65 72 20 67 65 74 2d 62 | 75 66 66 65 72 20 62 75 |er get-b|uffer bu|
|000022b0| 66 66 65 72 2d 6e 61 6d | 65 20 6e 6e 68 65 61 64 |ffer-nam|e nnhead|
|000022c0| 65 72 2d 73 65 74 2d 74 | 65 6d 70 2d 62 75 66 66 |er-set-t|emp-buff|
|000022d0| 65 72 20 66 6f 72 6d 61 | 74 20 22 20 2a 6e 6e 77 |er forma|t " *nnw|
|000022e0| 65 62 20 25 73 20 25 73 | 20 25 73 2a 22 20 6e 6e |eb %s %s| %s*" nn|
|000022f0| 77 65 62 2d 74 79 70 65 | 20 6e 6e 77 65 62 2d 73 |web-type| nnweb-s|
|00002300| 65 61 72 63 68 20 73 65 | 72 76 65 72 5d 20 37 20 |earch se|rver] 7 |
|00002310| 28 23 24 20 2e 20 38 37 | 34 35 29 5d 29 0a 28 64 |(#$ . 87|45)]).(d|
|00002320| 65 66 61 6c 69 61 73 20 | 27 6e 6e 77 65 62 2d 66 |efalias |'nnweb-f|
|00002330| 65 74 63 68 2d 75 72 6c | 20 23 5b 28 75 72 6c 29 |etch-url| #[(url)|
|00002340| 20 22 8a 08 ac 97 70 19 | 8a 5c 6e 71 88 c3 20 88 | "....p.|.\nq.. .|
|00002350| c4 0d 21 88 c6 09 65 64 | 23 88 2a c7 aa 88 c8 0d |..!...ed|#.*.....|
|00002360| c9 70 08 24 88 c7 29 87 | 22 20 5b 6e 6e 68 65 61 |.p.$..).|" [nnhea|
|00002370| 64 65 72 2d 63 61 6c 6c | 62 61 63 6b 2d 66 75 6e |der-call|back-fun|
|00002380| 63 74 69 6f 6e 20 62 75 | 66 20 6e 6e 77 65 62 2d |ction bu|f nnweb-|
|00002390| 62 75 66 66 65 72 20 65 | 72 61 73 65 2d 62 75 66 |buffer e|rase-buf|
|000023a0| 66 65 72 20 75 72 6c 2d | 69 6e 73 65 72 74 2d 66 |fer url-|insert-f|
|000023b0| 69 6c 65 2d 63 6f 6e 74 | 65 6e 74 73 20 75 72 6c |ile-cont|ents url|
|000023c0| 20 63 6f 70 79 2d 74 6f | 2d 62 75 66 66 65 72 20 | copy-to|-buffer |
|000023d0| 74 20 6e 6e 77 65 62 2d | 75 72 6c 2d 72 65 74 72 |t nnweb-|url-retr|
|000023e0| 69 65 76 65 2d 61 73 79 | 6e 63 68 20 6e 6e 77 65 |ieve-asy|nch nnwe|
|000023f0| 62 2d 63 61 6c 6c 62 61 | 63 6b 5d 20 35 5d 29 0a |b-callba|ck] 5]).|
|00002400| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 6e 77 65 62 |(defalia|s 'nnweb|
|00002410| 2d 63 61 6c 6c 62 61 63 | 6b 20 23 5b 28 62 75 66 |-callbac|k #[(buf|
|00002420| 66 65 72 20 63 61 6c 6c | 62 61 63 6b 29 20 22 08 |fer call|back) ".|
|00002430| 89 19 ad 8a c2 09 21 ad | 85 c3 c2 09 21 21 29 ad |......!.|....!!).|
|00002440| b6 8a 08 71 88 c4 c5 21 | 20 88 c6 20 88 09 71 88 |...q...!| .. ..q.|
|00002450| 64 62 88 c7 08 21 88 29 | 0e 08 c9 21 88 08 89 1e |db...!.)|...!....|
|00002460| 5c 6e 89 19 ad 8a 09 3b | ab 83 c2 aa 81 c3 09 21 |\n.....;|.......!|
|00002470| 29 ad 84 cb 0e 5c 6e 21 | 29 87 22 20 5b 75 72 6c |)....\n!|)." [url|
|00002480| 2d 77 6f 72 6b 69 6e 67 | 2d 62 75 66 66 65 72 20 |-working|-buffer |
|00002490| 62 75 66 66 65 72 20 67 | 65 74 2d 62 75 66 66 65 |buffer g|et-buffe|
|000024a0| 72 20 62 75 66 66 65 72 | 2d 6e 61 6d 65 20 6e 6e |r buffer|-name nn|
|000024b0| 77 65 62 2d 64 65 66 69 | 6e 69 74 69 6f 6e 20 61 |web-defi|nition a|
|000024c0| 72 74 69 63 6c 65 20 6e | 6e 77 65 62 2d 64 65 63 |rticle n|nweb-dec|
|000024d0| 6f 64 65 2d 65 6e 74 69 | 74 69 65 73 20 69 6e 73 |ode-enti|ties ins|
|000024e0| 65 72 74 2d 62 75 66 66 | 65 72 2d 73 75 62 73 74 |ert-buff|er-subst|
|000024f0| 72 69 6e 67 20 63 61 6c | 6c 62 61 63 6b 20 74 20 |ring cal|lback t |
|00002500| 62 75 66 20 6b 69 6c 6c | 2d 62 75 66 66 65 72 5d |buf kill|-buffer]|
|00002510| 20 34 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 4]).(de|falias '|
|00002520| 6e 6e 77 65 62 2d 75 72 | 6c 2d 72 65 74 72 69 65 |nnweb-ur|l-retrie|
|00002530| 76 65 2d 61 73 79 6e 63 | 68 20 23 5b 28 75 72 6c |ve-async|h #[(url|
|00002540| 20 63 61 6c 6c 62 61 63 | 6b 20 26 72 65 73 74 20 | callbac|k &rest |
|00002550| 64 61 74 61 29 20 22 c0 | 09 c2 89 c3 c4 21 1d 1e |data) ".|.....!..|
|00002560| 06 1e 07 1e 08 1e 09 ca | c1 cb 5c 22 88 8a cc 0d |........|..\"....|
|00002570| 21 71 88 0e 0d 16 0e cb | 11 0e 0f 16 10 d1 0e 12 |!q......|........|
|00002580| 21 88 29 ca c1 0e 08 5c | 22 2d 87 22 20 5b 22 47 |!.)....\|"-." ["G|
|00002590| 45 54 22 20 75 72 6c 2d | 62 65 2d 61 73 79 6e 63 |ET" url-|be-async|
|000025a0| 68 72 6f 6e 6f 75 73 20 | 6e 69 6c 20 67 65 6e 65 |hronous |nil gene|
|000025b0| 72 61 74 65 2d 6e 65 77 | 2d 62 75 66 66 65 72 2d |rate-new|-buffer-|
|000025c0| 6e 61 6d 65 20 22 20 2a | 6e 6e 77 65 62 2a 22 20 |name " *|nnweb*" |
|000025d0| 75 72 6c 2d 77 6f 72 6b | 69 6e 67 2d 62 75 66 66 |url-work|ing-buff|
|000025e0| 65 72 20 75 72 6c 2d 72 | 65 71 75 65 73 74 2d 65 |er url-r|equest-e|
|000025f0| 78 74 72 61 2d 68 65 61 | 64 65 72 73 20 75 72 6c |xtra-hea|ders url|
|00002600| 2d 72 65 71 75 65 73 74 | 2d 64 61 74 61 20 6f 6c |-request|-data ol|
|00002610| 64 2d 61 73 79 6e 63 68 | 20 75 72 6c 2d 72 65 71 |d-asynch| url-req|
|00002620| 75 65 73 74 2d 6d 65 74 | 68 6f 64 20 73 65 74 2d |uest-met|hod set-|
|00002630| 64 65 66 61 75 6c 74 20 | 74 20 67 65 74 2d 62 75 |default |t get-bu|
|00002640| 66 66 65 72 2d 63 72 65 | 61 74 65 20 64 61 74 61 |ffer-cre|ate data|
|00002650| 20 75 72 6c 2d 63 75 72 | 72 65 6e 74 2d 63 61 6c | url-cur|rent-cal|
|00002660| 6c 62 61 63 6b 2d 64 61 | 74 61 20 63 61 6c 6c 62 |lback-da|ta callb|
|00002670| 61 63 6b 20 75 72 6c 2d | 63 75 72 72 65 6e 74 2d |ack url-|current-|
|00002680| 63 61 6c 6c 62 61 63 6b | 2d 66 75 6e 63 20 75 72 |callback|-func ur|
|00002690| 6c 2d 72 65 74 72 69 65 | 76 65 20 75 72 6c 5d 20 |l-retrie|ve url] |
|000026a0| 36 5d 29 0a 23 40 33 33 | 20 52 65 74 75 72 6e 20 |6]).#@33| Return |
|000026b0| 50 41 49 52 53 20 65 6e | 63 6f 64 65 64 20 66 6f |PAIRS en|coded fo|
|000026c0| 72 20 66 6f 72 6d 73 2e | 1f 0a 28 64 65 66 61 6c |r forms.|..(defal|
|000026d0| 69 61 73 20 27 6e 6e 77 | 65 62 2d 65 6e 63 6f 64 |ias 'nnw|eb-encod|
|000026e0| 65 2d 77 77 77 2d 66 6f | 72 6d 2d 75 72 6c 65 6e |e-www-fo|rm-urlen|
|000026f0| 63 6f 64 65 64 20 23 5b | 28 70 61 69 72 73 29 20 |coded #[|(pairs) |
|00002700| 22 c0 c1 5c 6e c3 23 87 | 22 20 5b 6d 61 70 63 6f |"..\n.#.|" [mapco|
|00002710| 6e 63 61 74 20 23 5b 28 | 64 61 74 61 29 20 22 c0 |ncat #[(|data) ".|
|00002720| 09 40 21 c2 c0 09 41 21 | 51 87 22 20 5b 77 33 2d |.@!...A!|Q." [w3-|
|00002730| 66 6f 72 6d 2d 65 6e 63 | 6f 64 65 2d 78 77 66 75 |form-enc|ode-xwfu|
|00002740| 20 64 61 74 61 20 22 3d | 22 5d 20 34 5d 20 70 61 | data "=|"] 4] pa|
|00002750| 69 72 73 20 22 26 22 5d | 20 34 20 28 23 24 20 2e |irs "&"]| 4 (#$ .|
|00002760| 20 39 38 39 37 29 5d 29 | 0a 28 64 65 66 61 6c 69 | 9897)])|.(defali|
|00002770| 61 73 20 27 6e 6e 77 65 | 62 2d 66 65 74 63 68 2d |as 'nnwe|b-fetch-|
|00002780| 66 6f 72 6d 20 23 5b 28 | 75 72 6c 20 70 61 69 72 |form #[(|url pair|
|00002790| 73 29 20 22 c0 09 21 c2 | c3 1c 1d 1e 06 c7 0e 08 |s) "..!.|........|
|000027a0| 21 88 c9 16 5c 6e 2b cb | 87 22 20 5b 6e 6e 77 65 |!...\n+.|." [nnwe|
|000027b0| 62 2d 65 6e 63 6f 64 65 | 2d 77 77 77 2d 66 6f 72 |b-encode|-www-for|
|000027c0| 6d 2d 75 72 6c 65 6e 63 | 6f 64 65 64 20 70 61 69 |m-urlenc|oded pai|
|000027d0| 72 73 20 22 50 4f 53 54 | 22 20 28 28 22 43 6f 6e |rs "POST|" (("Con|
|000027e0| 74 65 6e 74 2d 74 79 70 | 65 22 20 2e 20 22 61 70 |tent-typ|e" . "ap|
|000027f0| 70 6c 69 63 61 74 69 6f | 6e 2f 78 2d 77 77 77 2d |plicatio|n/x-www-|
|00002800| 66 6f 72 6d 2d 75 72 6c | 65 6e 63 6f 64 65 64 22 |form-url|encoded"|
|00002810| 29 29 20 75 72 6c 2d 72 | 65 71 75 65 73 74 2d 65 |)) url-r|equest-e|
|00002820| 78 74 72 61 2d 68 65 61 | 64 65 72 73 20 75 72 6c |xtra-hea|ders url|
|00002830| 2d 72 65 71 75 65 73 74 | 2d 6d 65 74 68 6f 64 20 |-request|-method |
|00002840| 75 72 6c 2d 72 65 71 75 | 65 73 74 2d 64 61 74 61 |url-requ|est-data|
|00002850| 20 75 72 6c 2d 69 6e 73 | 65 72 74 2d 66 69 6c 65 | url-ins|ert-file|
|00002860| 2d 63 6f 6e 74 65 6e 74 | 73 20 75 72 6c 20 6e 69 |-content|s url ni|
|00002870| 6c 20 62 75 66 66 65 72 | 2d 66 69 6c 65 2d 6e 61 |l buffer|-file-na|
|00002880| 6d 65 20 74 5d 20 33 5d | 29 0a 28 64 65 66 61 6c |me t] 3]|).(defal|
|00002890| 69 61 73 20 27 6e 6e 77 | 65 62 2d 64 65 63 6f 64 |ias 'nnw|eb-decod|
|000028a0| 65 2d 65 6e 74 69 74 69 | 65 73 20 23 5b 6e 69 6c |e-entiti|es #[nil|
|000028b0| 20 22 65 62 88 c0 c1 c2 | c3 23 ad 95 c4 c5 c6 c7 | "eb....|.#......|
|000028c0| c8 21 21 0e 09 b7 41 ae | 81 ca 21 c3 89 23 88 aa |.!!...A.|..!..#..|
|000028d0| 64 87 22 20 5b 72 65 2d | 73 65 61 72 63 68 2d 66 |d." [re-|search-f|
|000028e0| 6f 72 77 61 72 64 20 22 | 26 5c 5c 28 5b 61 2d 7a |orward "|&\\([a-z|
|000028f0| 5d 2b 5c 5c 29 3b 22 20 | 6e 69 6c 20 74 20 72 65 |]+\\);" |nil t re|
|00002900| 70 6c 61 63 65 2d 6d 61 | 74 63 68 20 63 68 61 72 |place-ma|tch char|
|00002910| 2d 74 6f 2d 73 74 72 69 | 6e 67 20 69 6e 74 65 72 |-to-stri|ng inter|
|00002920| 6e 20 6d 61 74 63 68 2d | 73 74 72 69 6e 67 20 31 |n match-|string 1|
|00002930| 20 77 33 2d 68 74 6d 6c | 2d 65 6e 74 69 74 69 65 | w3-html|-entitie|
|00002940| 73 20 3f 5c 23 5d 20 35 | 5d 29 0a 28 64 65 66 61 |s ?\#] 5|]).(defa|
|00002950| 6c 69 61 73 20 27 6e 6e | 77 65 62 2d 72 65 6d 6f |lias 'nn|web-remo|
|00002960| 76 65 2d 6d 61 72 6b 75 | 70 20 23 5b 6e 69 6c 20 |ve-marku|p #[nil |
|00002970| 22 65 62 88 c0 c1 c2 c3 | 23 ab 8e c4 94 c0 c5 c2 |"eb.....|#.......|
|00002980| c3 23 ae 81 64 7c 88 aa | 6b 65 62 88 c6 c7 c2 c3 |.#..d|..|keb.....|
|00002990| 23 ad 88 c8 c9 c3 89 23 | 88 aa 71 87 22 20 5b 73 |#......#|..q." [s|
|000029a0| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 22 3c |earch-fo|rward "<|
|000029b0| 21 2d 2d 22 20 6e 69 6c | 20 74 20 30 20 22 2d 2d |!--" nil| t 0 "--|
|000029c0| 3e 22 20 72 65 2d 73 65 | 61 72 63 68 2d 66 6f 72 |>" re-se|arch-for|
|000029d0| 77 61 72 64 20 22 3c 5b | 5e 3e 5d 2b 3e 22 20 72 |ward "<[|^>]+>" r|
|000029e0| 65 70 6c 61 63 65 2d 6d | 61 74 63 68 20 22 22 5d |eplace-m|atch ""]|
|000029f0| 20 35 5d 29 0a 23 40 35 | 35 20 50 65 72 66 6f 72 | 5]).#@5|5 Perfor|
|00002a00| 6d 20 74 68 65 20 73 65 | 61 72 63 68 20 61 6e 64 |m the se|arch and|
|00002a10| 20 63 72 65 61 74 65 20 | 61 6e 20 6e 75 6d 62 65 | create |an numbe|
|00002a20| 72 2d 74 6f 2d 75 72 6c | 20 61 6c 69 73 74 2e 1f |r-to-url| alist..|
|00002a30| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6e 6e 77 65 |.(defali|as 'nnwe|
|00002a40| 62 2d 64 65 6a 61 6e 65 | 77 73 2d 63 72 65 61 74 |b-dejane|ws-creat|
|00002a50| 65 2d 6d 61 70 70 69 6e | 67 20 23 5b 6e 69 6c 20 |e-mappin|g #[nil |
|00002a60| 22 8a 08 71 88 c1 20 88 | c2 c3 21 0c 21 85 29 01 |"..q.. .|..!.!.).|
|00002a70| c5 c6 89 c7 0e 08 0e 09 | 5c 22 41 40 ae 83 ca c5 |........|\"A@....|
|00002a80| 42 cb 89 89 89 89 89 89 | 1e 0c 1e 0d 1e 0e 1e 0f |B.......|........|
|00002a90| 1e 10 1e 11 1e 12 1e 13 | 1e 14 1e 15 1e 16 0e 15 |........|........|
|00002aa0| 83 1c 01 65 62 88 d7 20 | 88 65 62 88 d8 d9 cb c6 |...eb.. |.eb.....|
|00002ab0| 23 83 f7 00 60 d8 d9 cb | c6 23 ab 84 c5 94 aa 8b |#...`...|.#......|
|00002ac0| da db cb c6 23 ab 83 60 | aa 81 64 7d 88 65 62 88 |....#..`|..d}.eb.|
|00002ad0| dc dd 21 ab 85 de ca 21 | 16 0c df 20 88 65 62 88 |..!....!|... .eb.|
|00002ae0| da e0 cb c6 23 ab 86 e1 | e2 21 88 aa 73 65 62 88 |....#...|.!..seb.|
|00002af0| d8 e3 cb c6 23 ab 8c e4 | de ca 21 21 de e5 21 4c |....#...|..!!..!L|
|00002b00| 88 aa 6d 7e 88 e6 e7 0e | 12 5c 22 ab 88 0e 12 c5 |..m~....|.\".....|
|00002b10| 89 94 4f 16 12 0e 16 54 | 16 16 e8 0e 0c 21 ac 0d |..O....T|.....!..|
|00002b20| 0e 13 89 41 54 a1 e9 0e | 13 41 ea 0e 0f eb 0e 12 |...AT...|.A......|
|00002b30| 52 0e 0e 0e 10 ec ed 0e | 0c 21 ee 51 cb c5 ef 0e |R.......|.!.Q....|
|00002b40| 11 21 0e 0c 26 09 44 0e | 0d 42 16 0d f0 0e 0d 40 |.!..&.D.|.B.....@|
|00002b50| 41 40 0e 0d 40 5c 22 88 | 82 4a 00 d8 f1 cb c6 23 |A@..@\".|.J.....#|
|00002b60| ab 87 0e 16 0e 32 59 ab | 87 cb 89 16 15 82 3e 00 |.....2Y.|......>.|
|00002b70| de ca 21 16 15 c1 20 88 | f3 0e 15 21 88 82 3c 00 |..!... .|...!..<.|
|00002b80| f4 0e 35 0e 0d a4 f6 5c | 22 89 16 35 2e 0b 29 87 |..5....\|"..5..).|
|00002b90| 22 20 5b 6e 6e 77 65 62 | 2d 62 75 66 66 65 72 20 |" [nnweb|-buffer |
|00002ba0| 65 72 61 73 65 2d 62 75 | 66 66 65 72 20 6e 6e 77 |erase-bu|ffer nnw|
|00002bb0| 65 62 2d 64 65 66 69 6e | 69 74 69 6f 6e 20 73 65 |eb-defin|ition se|
|00002bc0| 61 72 63 68 20 6e 6e 77 | 65 62 2d 73 65 61 72 63 |arch nnw|eb-searc|
|00002bd0| 68 20 30 20 74 20 61 73 | 73 6f 63 20 6e 6e 77 65 |h 0 t as|soc nnwe|
|00002be0| 62 2d 67 72 6f 75 70 20 | 6e 6e 77 65 62 2d 67 72 |b-group |nnweb-gr|
|00002bf0| 6f 75 70 2d 61 6c 69 73 | 74 20 31 20 6e 69 6c 20 |oup-alis|t 1 nil |
|00002c00| 75 72 6c 20 6d 61 70 20 | 41 75 74 68 6f 72 20 4e |url map |Author N|
|00002c10| 65 77 73 67 72 6f 75 70 | 20 44 61 74 65 20 53 63 |ewsgroup| Date Sc|
|00002c20| 6f 72 65 20 53 75 62 6a | 65 63 74 20 61 63 74 69 |ore Subj|ect acti|
|00002c30| 76 65 20 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 |ve case-|fold-sea|
|00002c40| 72 63 68 20 6d 6f 72 65 | 20 69 20 6e 6e 77 65 62 |rch more| i nnweb|
|00002c50| 2d 64 65 63 6f 64 65 2d | 65 6e 74 69 74 69 65 73 |-decode-|entities|
|00002c60| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|00002c70| 72 64 20 22 5e 20 2b 5b | 30 2d 39 5d 2b 5c 5c 2e |rd "^ +[|0-9]+\\.|
|00002c80| 22 20 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |" search|-forward|
|00002c90| 20 22 5c 6e 5c 6e 22 20 | 6c 6f 6f 6b 69 6e 67 2d | "\n\n" |looking-|
|00002ca0| 61 74 20 22 2e 2a 48 52 | 45 46 3d 5c 22 5c 5c 28 |at ".*HR|EF=\"\\(|
|00002cb0| 5b 5e 5c 22 5d 2b 5c 5c | 29 5c 22 22 20 6d 61 74 |[^\"]+\\|)\"" mat|
|00002cc0| 63 68 2d 73 74 72 69 6e | 67 20 6e 6e 77 65 62 2d |ch-strin|g nnweb-|
|00002cd0| 72 65 6d 6f 76 65 2d 6d | 61 72 6b 75 70 20 22 09 |remove-m|arkup ".|
|00002ce0| 22 20 72 65 70 6c 61 63 | 65 2d 6d 61 74 63 68 20 |" replac|e-match |
|00002cf0| 22 20 22 20 22 5e 20 2b | 5c 5c 28 5b 5e 3a 5d 2b |" " "^ +|\\([^:]+|
|00002d00| 5c 5c 29 3a 20 2b 5c 5c | 28 2e 2a 5c 5c 29 24 22 |\\): +\\|(.*\\)$"|
|00002d10| 20 69 6e 74 65 72 6e 20 | 32 20 73 74 72 69 6e 67 | intern |2 string|
|00002d20| 2d 6d 61 74 63 68 20 22 | 23 5b 30 2d 39 5d 2b 2f |-match "|#[0-9]+/|
|00002d30| 5b 30 2d 39 5d 2b 20 2a | 24 22 20 6e 6e 77 65 62 |[0-9]+ *|$" nnweb|
|00002d40| 2d 67 65 74 2d 68 61 73 | 68 74 62 20 6d 61 6b 65 |-get-has|htb make|
|00002d50| 2d 66 75 6c 6c 2d 6d 61 | 69 6c 2d 68 65 61 64 65 |-full-ma|il-heade|
|00002d60| 72 20 22 28 22 20 22 29 | 20 22 20 22 3c 22 20 6e |r "(" ")| " "<" n|
|00002d70| 6e 77 65 62 2d 69 64 65 | 6e 74 69 66 69 65 72 20 |nweb-ide|ntifier |
|00002d80| 22 40 64 65 6a 61 6e 65 | 77 73 3e 22 20 73 74 72 |"@dejane|ws>" str|
|00002d90| 69 6e 67 2d 74 6f 2d 69 | 6e 74 20 6e 6e 77 65 62 |ing-to-i|nt nnweb|
|00002da0| 2d 73 65 74 2d 68 61 73 | 68 74 62 20 22 48 52 45 |-set-has|htb "HRE|
|00002db0| 46 3d 5c 22 5c 5c 28 5b | 5e 5c 22 5d 2b 5c 5c 29 |F=\"\\([|^\"]+\\)|
|00002dc0| 5c 22 3e 47 65 74 20 6e | 65 78 74 22 20 6e 6e 77 |\">Get n|ext" nnw|
|00002dd0| 65 62 2d 6d 61 78 2d 68 | 69 74 73 20 75 72 6c 2d |eb-max-h|its url-|
|00002de0| 69 6e 73 65 72 74 2d 66 | 69 6c 65 2d 63 6f 6e 74 |insert-f|ile-cont|
|00002df0| 65 6e 74 73 20 73 6f 72 | 74 20 6e 6e 77 65 62 2d |ents sor|t nnweb-|
|00002e00| 61 72 74 69 63 6c 65 73 | 20 23 5b 28 73 31 20 73 |articles| #[(s1 s|
|00002e10| 32 29 20 22 08 40 09 40 | 57 87 22 20 5b 73 31 20 |2) ".@.@|W." [s1 |
|00002e20| 73 32 5d 20 32 5d 5d 20 | 31 32 20 28 23 24 20 2e |s2] 2]] |12 (#$ .|
|00002e30| 20 31 30 37 34 36 29 5d | 29 0a 28 64 65 66 61 6c | 10746)]|).(defal|
|00002e40| 69 61 73 20 27 6e 6e 77 | 65 62 2d 64 65 6a 61 6e |ias 'nnw|eb-dejan|
|00002e50| 65 77 73 2d 77 61 73 68 | 2d 61 72 74 69 63 6c 65 |ews-wash|-article|
|00002e60| 20 23 5b 6e 69 6c 20 22 | c0 19 65 62 88 c2 c3 c4 | #[nil "|..eb....|
|00002e70| c0 23 88 65 60 7c 88 c2 | c5 c4 c0 23 88 60 64 7c |.#.e`|..|...#.`d||
|00002e80| 88 c6 20 88 65 62 88 c7 | c8 21 ab 8f 6d ac 8c c9 |.. .eb..|.!..m...|
|00002e90| 79 88 60 ca 79 88 60 7c | 88 aa 6c c7 cb 21 ab 8a |y.`.y.`||..l..!..|
|00002ea0| cc cd c0 5c 22 88 ca 79 | 88 aa 71 c2 ce c4 c0 23 |...\"..y|..q....#|
|00002eb0| ab 86 cc cf c0 89 23 88 | 65 62 88 d0 d1 c4 c0 23 |......#.|eb.....#|
|00002ec0| ad 85 cc d2 c0 89 23 29 | 87 22 20 5b 74 20 63 61 |......#)|." [t ca|
|00002ed0| 73 65 2d 66 6f 6c 64 2d | 73 65 61 72 63 68 20 72 |se-fold-|search r|
|00002ee0| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|00002ef0| 20 22 3c 50 52 45 3e 22 | 20 6e 69 6c 20 22 3c 2f | "<PRE>"| nil "</|
|00002f00| 50 52 45 3e 22 20 6e 6e | 77 65 62 2d 72 65 6d 6f |PRE>" nn|web-remo|
|00002f10| 76 65 2d 6d 61 72 6b 75 | 70 20 6c 6f 6f 6b 69 6e |ve-marku|p lookin|
|00002f20| 67 2d 61 74 20 22 20 2a | 24 22 20 30 20 31 20 22 |g-at " *|$" 0 1 "|
|00002f30| 5c 5c 28 5e 5b 5e 20 5d | 2b 3a 5c 5c 29 20 2a 22 |\\(^[^ ]|+:\\) *"|
|00002f40| 20 72 65 70 6c 61 63 65 | 2d 6d 61 74 63 68 20 22 | replace|-match "|
|00002f50| 5c 5c 31 20 22 20 22 5c | 6e 5c 6e 2b 22 20 22 5c |\\1 " "\|n\n+" "\|
|00002f60| 6e 22 20 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |n" searc|h-forwar|
|00002f70| 64 20 22 5b 4d 6f 72 65 | 20 48 65 61 64 65 72 73 |d "[More| Headers|
|00002f80| 5d 22 20 22 22 5d 20 34 | 5d 29 0a 28 64 65 66 61 |]" ""] 4|]).(defa|
|00002f90| 6c 69 61 73 20 27 6e 6e | 77 65 62 2d 64 65 6a 61 |lias 'nn|web-deja|
|00002fa0| 6e 65 77 73 2d 73 65 61 | 72 63 68 20 23 5b 28 73 |news-sea|rch #[(s|
|00002fb0| 65 61 72 63 68 29 20 22 | c0 c1 c2 21 c3 0c 42 c5 |earch) "|...!..B.|
|00002fc0| 42 5c 22 88 c6 87 22 20 | 5b 6e 6e 77 65 62 2d 66 |B\"..." |[nnweb-f|
|00002fd0| 65 74 63 68 2d 66 6f 72 | 6d 20 6e 6e 77 65 62 2d |etch-for|m nnweb-|
|00002fe0| 64 65 66 69 6e 69 74 69 | 6f 6e 20 61 64 64 72 65 |definiti|on addre|
|00002ff0| 73 73 20 22 71 75 65 72 | 79 22 20 73 65 61 72 63 |ss "quer|y" searc|
|00003000| 68 20 28 28 22 64 65 66 | 61 75 6c 74 4f 70 22 20 |h (("def|aultOp" |
|00003010| 2e 20 22 41 4e 44 22 29 | 20 28 22 73 76 63 63 6c |. "AND")| ("svccl|
|00003020| 61 73 73 22 20 2e 20 22 | 64 6e 63 75 72 72 65 6e |ass" . "|dncurren|
|00003030| 74 22 29 20 28 22 6d 61 | 78 68 69 74 73 22 20 2e |t") ("ma|xhits" .|
|00003040| 20 22 31 30 30 22 29 20 | 28 22 66 6f 72 6d 61 74 | "100") |("format|
|00003050| 22 20 2e 20 22 76 65 72 | 62 6f 73 65 22 29 20 28 |" . "ver|bose") (|
|00003060| 22 74 68 72 65 61 64 65 | 64 22 20 2e 20 22 30 22 |"threade|d" . "0"|
|00003070| 29 20 28 22 73 68 6f 77 | 73 6f 72 74 22 20 2e 20 |) ("show|sort" . |
|00003080| 22 73 63 6f 72 65 22 29 | 20 28 22 61 67 65 73 69 |"score")| ("agesi|
|00003090| 67 6e 22 20 2e 20 22 31 | 22 29 20 28 22 61 67 65 |gn" . "1|") ("age|
|000030a0| 77 65 69 67 68 74 22 20 | 2e 20 22 31 22 29 29 20 |weight" |. "1")) |
|000030b0| 74 5d 20 34 5d 29 0a 23 | 40 34 33 20 52 65 74 75 |t] 4]).#|@43 Retu|
|000030c0| 72 6e 20 61 6e 20 75 6e | 69 71 75 65 20 69 64 65 |rn an un|ique ide|
|000030d0| 6e 74 69 66 69 65 72 20 | 62 61 73 65 64 20 6f 6e |ntifier |based on|
|000030e0| 20 55 52 4c 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 | URL...(|defalias|
|000030f0| 20 27 6e 6e 77 65 62 2d | 64 65 6a 61 6e 65 77 73 | 'nnweb-|dejanews|
|00003100| 2d 69 64 65 6e 74 69 74 | 79 20 23 5b 28 75 72 6c |-identit|y #[(url|
|00003110| 29 20 22 c0 c1 5c 6e 5c | 22 ab 85 c3 c4 5c 6e 5c |) "..\n\|"....\n\|
|00003120| 22 87 5c 6e 87 22 20 5b | 73 74 72 69 6e 67 2d 6d |".\n." [|string-m|
|00003130| 61 74 63 68 20 22 72 65 | 63 6e 75 6d 3d 5c 5c 28 |atch "re|cnum=\\(|
|00003140| 5b 30 2d 39 5d 2b 5c 5c | 29 22 20 75 72 6c 20 6d |[0-9]+\\|)" url m|
|00003150| 61 74 63 68 2d 73 74 72 | 69 6e 67 20 31 5d 20 33 |atch-str|ing 1] 3|
|00003160| 20 28 23 24 20 2e 20 31 | 32 34 37 36 29 5d 29 0a | (#$ . 1|2476)]).|
|00003170| 23 40 35 35 20 50 65 72 | 66 6f 72 6d 20 74 68 65 |#@55 Per|form the|
|00003180| 20 73 65 61 72 63 68 20 | 61 6e 64 20 63 72 65 61 | search |and crea|
|00003190| 74 65 20 61 6e 20 6e 75 | 6d 62 65 72 2d 74 6f 2d |te an nu|mber-to-|
|000031a0| 75 72 6c 20 61 6c 69 73 | 74 2e 1f 0a 28 64 65 66 |url alis|t...(def|
|000031b0| 61 6c 69 61 73 20 27 6e | 6e 77 65 62 2d 72 65 66 |alias 'n|nweb-ref|
|000031c0| 65 72 65 6e 63 65 2d 63 | 72 65 61 74 65 2d 6d 61 |erence-c|reate-ma|
|000031d0| 70 70 69 6e 67 20 23 5b | 6e 69 6c 20 22 8a 08 71 |pping #[|nil "..q|
|000031e0| 88 c1 20 88 c2 c3 21 0c | 21 85 fd 00 c5 c6 89 c7 |.. ...!.|!.......|
|000031f0| 0e 08 0e 09 5c 22 41 40 | ae 83 ca c5 42 cb 89 89 |....\"A@|....B...|
|00003200| 89 89 89 89 89 1e 0c 1e | 0d 1e 0e 1e 0f 1e 10 1e |........|........|
|00003210| 11 1e 12 1e 13 1e 14 1e | 15 1e 16 1e 17 0e 16 83 |........|........|
|00003220| f0 00 65 62 88 d8 d9 cb | c6 23 88 65 60 7c 88 65 |..eb....|.#.e`|.e|
|00003230| 62 88 da db cb c6 23 83 | e9 00 60 da dc cb c6 23 |b.....#.|..`....#|
|00003240| ab 84 c5 94 aa 81 64 7d | 88 65 62 88 dd de 21 ab |......d}|.eb...!.|
|00003250| 85 df ca 21 16 0c e0 20 | 88 65 62 88 d8 e1 cb c6 |...!... |.eb.....|
|00003260| 23 ab 86 e2 e3 21 88 aa | 73 65 62 88 da e4 cb c6 |#....!..|seb.....|
|00003270| 23 ab 8c e5 df ca 21 21 | df e6 21 4c 88 aa 6d 7e |#.....!!|..!L..m~|
|00003280| 88 d8 e7 cb c6 23 88 0e | 17 54 16 17 e8 0e 0c 21 |.....#..|.T.....!|
|00003290| ac 20 0e 14 89 41 54 a1 | e9 0e 14 41 ea 0e 10 eb |. ...AT.|...A....|
|000032a0| 0e 13 52 0e 0f 0e 11 0e | 0e cb c5 ec 0e 12 21 0e |..R.....|......!.|
|000032b0| 0c 26 09 44 0e 0d 42 16 | 0d ed 0e 0d 40 41 40 0e |.&.D..B.|....@A@.|
|000032c0| 0d 40 5c 22 88 82 54 00 | cb 89 16 16 84 44 00 ee |.@\"..T.|.....D..|
|000032d0| 0e 2f 0e 0d a4 f0 5c 22 | 89 16 2f 2e 0c 29 87 22 |./....\"|../..)."|
|000032e0| 20 5b 6e 6e 77 65 62 2d | 62 75 66 66 65 72 20 65 | [nnweb-|buffer e|
|000032f0| 72 61 73 65 2d 62 75 66 | 66 65 72 20 6e 6e 77 65 |rase-buf|fer nnwe|
|00003300| 62 2d 64 65 66 69 6e 69 | 74 69 6f 6e 20 73 65 61 |b-defini|tion sea|
|00003310| 72 63 68 20 6e 6e 77 65 | 62 2d 73 65 61 72 63 68 |rch nnwe|b-search|
|00003320| 20 30 20 74 20 61 73 73 | 6f 63 20 6e 6e 77 65 62 | 0 t ass|oc nnweb|
|00003330| 2d 67 72 6f 75 70 20 6e | 6e 77 65 62 2d 67 72 6f |-group n|nweb-gro|
|00003340| 75 70 2d 61 6c 69 73 74 | 20 31 20 6e 69 6c 20 75 |up-alist| 1 nil u|
|00003350| 72 6c 20 6d 61 70 20 4d | 65 73 73 61 67 65 2d 49 |rl map M|essage-I|
|00003360| 44 20 46 72 6f 6d 20 4e | 65 77 73 67 72 6f 75 70 |D From N|ewsgroup|
|00003370| 73 20 44 61 74 65 20 53 | 63 6f 72 65 20 53 75 62 |s Date S|core Sub|
|00003380| 6a 65 63 74 20 61 63 74 | 69 76 65 20 63 61 73 65 |ject act|ive case|
|00003390| 2d 66 6f 6c 64 2d 73 65 | 61 72 63 68 20 6d 6f 72 |-fold-se|arch mor|
|000033a0| 65 20 69 20 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |e i sear|ch-forwa|
|000033b0| 72 64 20 22 3c 2f 70 72 | 65 3e 3c 68 72 3e 22 20 |rd "</pr|e><hr>" |
|000033c0| 72 65 2d 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |re-searc|h-forwar|
|000033d0| 64 20 22 5e 20 2b 5b 30 | 2d 39 5d 2b 5c 5c 2e 22 |d "^ +[0|-9]+\\."|
|000033e0| 20 22 5e 24 22 20 6c 6f | 6f 6b 69 6e 67 2d 61 74 | "^$" lo|oking-at|
|000033f0| 20 22 2e 2a 68 72 65 66 | 3d 5c 22 5c 5c 28 5b 5e | ".*href|=\"\\([^|
|00003400| 5c 22 5d 2b 5c 5c 29 5c | 22 22 20 6d 61 74 63 68 |\"]+\\)\|"" match|
|00003410| 2d 73 74 72 69 6e 67 20 | 6e 6e 77 65 62 2d 72 65 |-string |nnweb-re|
|00003420| 6d 6f 76 65 2d 6d 61 72 | 6b 75 70 20 22 09 22 20 |move-mar|kup "." |
|00003430| 72 65 70 6c 61 63 65 2d | 6d 61 74 63 68 20 22 20 |replace-|match " |
|00003440| 22 20 22 5e 5c 5c 28 5b | 5e 3a 5d 2b 5c 5c 29 3a |" "^\\([|^:]+\\):|
|00003450| 20 5c 5c 28 2e 2a 5c 5c | 29 24 22 20 69 6e 74 65 | \\(.*\\|)$" inte|
|00003460| 72 6e 20 32 20 22 3c 2f | 70 72 65 3e 22 20 6e 6e |rn 2 "</|pre>" nn|
|00003470| 77 65 62 2d 67 65 74 2d | 68 61 73 68 74 62 20 6d |web-get-|hashtb m|
|00003480| 61 6b 65 2d 66 75 6c 6c | 2d 6d 61 69 6c 2d 68 65 |ake-full|-mail-he|
|00003490| 61 64 65 72 20 22 28 22 | 20 22 29 20 22 20 73 74 |ader "("| ") " st|
|000034a0| 72 69 6e 67 2d 74 6f 2d | 69 6e 74 20 6e 6e 77 65 |ring-to-|int nnwe|
|000034b0| 62 2d 73 65 74 2d 68 61 | 73 68 74 62 20 73 6f 72 |b-set-ha|shtb sor|
|000034c0| 74 20 6e 6e 77 65 62 2d | 61 72 74 69 63 6c 65 73 |t nnweb-|articles|
|000034d0| 20 23 5b 28 73 31 20 73 | 32 29 20 22 08 40 09 40 | #[(s1 s|2) ".@.@|
|000034e0| 57 87 22 20 5b 73 31 20 | 73 32 5d 20 32 5d 5d 20 |W." [s1 |s2] 2]] |
|000034f0| 31 33 20 28 23 24 20 2e | 20 31 32 36 36 31 29 5d |13 (#$ .| 12661)]|
|00003500| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 77 |).(defal|ias 'nnw|
|00003510| 65 62 2d 72 65 66 65 72 | 65 6e 63 65 2d 77 61 73 |eb-refer|ence-was|
|00003520| 68 2d 61 72 74 69 63 6c | 65 20 23 5b 6e 69 6c 20 |h-articl|e #[nil |
|00003530| 22 c0 19 65 62 88 c2 c3 | c4 c0 23 88 65 60 7c 88 |"..eb...|..#.e`|.|
|00003540| c5 c6 c4 c0 23 88 c7 79 | 88 c8 20 1e 09 c5 ca c4 |....#..y|.. .....|
|00003550| c0 23 88 60 64 7c 88 cb | 20 88 65 62 88 cc cd 21 |.#.`d|..| .eb...!|
|00003560| ab 8c ce 79 88 60 cf 79 | 88 60 7c 88 aa 6f 65 0e |...y.`.y|.`|..oe.|
|00003570| 09 7d 88 c2 d0 c4 c0 23 | ab 8f 6d ac 8c ce 79 88 |.}.....#|..m...y.|
|00003580| 60 cf 79 88 60 7c 88 aa | 6a 65 62 88 cc d1 21 ab |`.y.`|..|jeb...!.|
|00003590| 8a d2 d3 c0 5c 22 88 cf | 79 88 aa 71 65 62 88 c2 |....\"..|y..qeb..|
|000035a0| d4 c4 c0 23 ab b4 60 c2 | d5 c4 c0 23 ab 84 ce 94 |...#..`.|...#....|
|000035b0| aa 81 64 7d 88 65 62 88 | 6d ac 8d cc d6 21 ac 78 |..d}.eb.|m....!.x|
|000035c0| d7 63 88 cf 79 88 aa 70 | 65 62 88 c5 d8 c4 c0 23 |.c..y..p|eb.....#|
|000035d0| ab 88 d2 d9 c0 89 23 88 | aa 71 7e 88 0e 09 c4 89 |......#.|.q~.....|
|000035e0| 93 2a 87 22 20 5b 74 20 | 63 61 73 65 2d 66 6f 6c |.*." [t |case-fol|
|000035f0| 64 2d 73 65 61 72 63 68 | 20 72 65 2d 73 65 61 72 |d-search| re-sear|
|00003600| 63 68 2d 66 6f 72 77 61 | 72 64 20 22 5e 3c 2f 63 |ch-forwa|rd "^</c|
|00003610| 65 6e 74 65 72 3e 3c 68 | 72 3e 22 20 6e 69 6c 20 |enter><h|r>" nil |
|00003620| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 22 |search-f|orward "|
|00003630| 3c 70 72 65 3e 22 20 2d | 31 20 70 6f 69 6e 74 2d |<pre>" -|1 point-|
|00003640| 6d 61 72 6b 65 72 20 62 | 6f 64 79 20 22 3c 2f 70 |marker b|ody "</p|
|00003650| 72 65 3e 22 20 6e 6e 77 | 65 62 2d 72 65 6d 6f 76 |re>" nnw|eb-remov|
|00003660| 65 2d 6d 61 72 6b 75 70 | 20 6c 6f 6f 6b 69 6e 67 |e-markup| looking|
|00003670| 2d 61 74 20 22 20 2a 24 | 22 20 30 20 31 20 22 5e |-at " *$|" 0 1 "^|
|00003680| 24 22 20 22 5c 5c 28 5e | 5b 5e 20 5d 2b 3a 5c 5c |$" "\\(^|[^ ]+:\\|
|00003690| 29 20 2a 22 20 72 65 70 | 6c 61 63 65 2d 6d 61 74 |) *" rep|lace-mat|
|000036a0| 63 68 20 22 5c 5c 31 20 | 22 20 22 5e 52 65 66 65 |ch "\\1 |" "^Refe|
|000036b0| 72 65 6e 63 65 73 3a 22 | 20 22 5e 24 5c 5c 7c 5e |rences:"| "^$\\|^|
|000036c0| 5b 5e 3a 5d 2b 3a 22 20 | 22 52 65 66 65 72 65 6e |[^:]+:" |"Referen|
|000036d0| 63 65 73 22 20 22 09 22 | 20 22 2c 22 20 22 20 22 |ces" "."| "," " "|
|000036e0| 5d 20 35 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 5]).(d|efalias |
|000036f0| 27 6e 6e 77 65 62 2d 72 | 65 66 65 72 65 6e 63 65 |'nnweb-r|eference|
|00003700| 2d 73 65 61 72 63 68 20 | 23 5b 28 73 65 61 72 63 |-search |#[(searc|
|00003710| 68 29 20 22 c0 c1 c2 21 | c3 c4 c5 c6 0e 07 42 c8 |h) "...!|......B.|
|00003720| 42 42 21 51 21 88 c9 16 | 5c 6e cb 87 22 20 5b 75 |BB!Q!...|\n.." [u|
|00003730| 72 6c 2d 69 6e 73 65 72 | 74 2d 66 69 6c 65 2d 63 |rl-inser|t-file-c|
|00003740| 6f 6e 74 65 6e 74 73 20 | 6e 6e 77 65 62 2d 64 65 |ontents |nnweb-de|
|00003750| 66 69 6e 69 74 69 6f 6e | 20 61 64 64 72 65 73 73 |finition| address|
|00003760| 20 22 3f 22 20 6e 6e 77 | 65 62 2d 65 6e 63 6f 64 | "?" nnw|eb-encod|
|00003770| 65 2d 77 77 77 2d 66 6f | 72 6d 2d 75 72 6c 65 6e |e-www-fo|rm-urlen|
|00003780| 63 6f 64 65 64 20 28 22 | 73 65 61 72 63 68 22 20 |coded ("|search" |
|00003790| 2e 20 22 61 64 76 61 6e | 63 65 64 22 29 20 22 71 |. "advan|ced") "q|
|000037a0| 75 65 72 79 74 65 78 74 | 22 20 73 65 61 72 63 68 |uerytext|" search|
|000037b0| 20 28 28 22 73 75 62 6a | 22 20 2e 20 22 22 29 20 | (("subj|" . "") |
|000037c0| 28 22 6e 61 6d 65 22 20 | 2e 20 22 22 29 20 28 22 |("name" |. "") ("|
|000037d0| 6c 6f 67 69 6e 22 20 2e | 20 22 22 29 20 28 22 68 |login" .| "") ("h|
|000037e0| 6f 73 74 22 20 2e 20 22 | 22 29 20 28 22 6f 72 67 |ost" . "|") ("org|
|000037f0| 61 6e 69 7a 61 74 69 6f | 6e 22 20 2e 20 22 22 29 |anizatio|n" . "")|
|00003800| 20 28 22 67 72 6f 75 70 | 73 22 20 2e 20 22 22 29 | ("group|s" . "")|
|00003810| 20 28 22 6b 65 79 77 6f | 72 64 73 22 20 2e 20 22 | ("keywo|rds" . "|
|00003820| 22 29 20 28 22 63 68 6f | 69 63 65 22 20 2e 20 22 |") ("cho|ice" . "|
|00003830| 53 65 61 72 63 68 22 29 | 20 28 22 73 74 61 72 74 |Search")| ("start|
|00003840| 6d 6f 6e 74 68 22 20 2e | 20 22 4a 75 6c 22 29 20 |month" .| "Jul") |
|00003850| 28 22 73 74 61 72 74 64 | 61 79 22 20 2e 20 22 32 |("startd|ay" . "2|
|00003860| 35 22 29 20 28 22 73 74 | 61 72 74 79 65 61 72 22 |5") ("st|artyear"|
|00003870| 20 2e 20 22 31 39 39 36 | 22 29 20 28 22 65 6e 64 | . "1996|") ("end|
|00003880| 6d 6f 6e 74 68 22 20 2e | 20 22 41 75 67 22 29 20 |month" .| "Aug") |
|00003890| 28 22 65 6e 64 64 61 79 | 22 20 2e 20 22 32 34 22 |("endday|" . "24"|
|000038a0| 29 20 28 22 65 6e 64 79 | 65 61 72 22 20 2e 20 22 |) ("endy|ear" . "|
|000038b0| 31 39 39 36 22 29 20 28 | 22 6d 6f 64 65 22 20 2e |1996") (|"mode" .|
|000038c0| 20 22 51 75 69 63 6b 22 | 29 20 28 22 76 65 72 62 | "Quick"|) ("verb|
|000038d0| 6f 73 69 74 79 22 20 2e | 20 22 56 65 72 62 6f 73 |osity" .| "Verbos|
|000038e0| 65 22 29 20 28 22 72 61 | 6e 6b 69 6e 67 22 20 2e |e") ("ra|nking" .|
|000038f0| 20 22 52 65 6c 65 76 61 | 6e 63 65 22 29 20 28 22 | "Releva|nce") ("|
|00003900| 66 69 72 73 74 22 20 2e | 20 22 31 22 29 20 28 22 |first" .| "1") ("|
|00003910| 6c 61 73 74 22 20 2e 20 | 22 32 35 22 29 20 28 22 |last" . |"25") ("|
|00003920| 73 63 6f 72 65 22 20 2e | 20 22 35 30 22 29 29 20 |score" .| "50")) |
|00003930| 6e 69 6c 20 62 75 66 66 | 65 72 2d 66 69 6c 65 2d |nil buff|er-file-|
|00003940| 6e 61 6d 65 20 74 5d 20 | 37 5d 29 0a 23 40 35 35 |name t] |7]).#@55|
|00003950| 20 50 65 72 66 6f 72 6d | 20 74 68 65 20 73 65 61 | Perform| the sea|
|00003960| 72 63 68 20 61 6e 64 20 | 63 72 65 61 74 65 20 61 |rch and |create a|
|00003970| 6e 20 6e 75 6d 62 65 72 | 2d 74 6f 2d 75 72 6c 20 |n number|-to-url |
|00003980| 61 6c 69 73 74 2e 1f 0a | 28 64 65 66 61 6c 69 61 |alist...|(defalia|
|00003990| 73 20 27 6e 6e 77 65 62 | 2d 61 6c 74 61 76 69 73 |s 'nnweb|-altavis|
|000039a0| 74 61 2d 63 72 65 61 74 | 65 2d 6d 61 70 70 69 6e |ta-creat|e-mappin|
|000039b0| 67 20 23 5b 6e 69 6c 20 | 22 8a 08 71 88 c1 20 88 |g #[nil |"..q.. .|
|000039c0| c2 1b c4 c5 21 0e 06 0b | 5c 22 85 f9 00 c2 c7 89 |....!...|\"......|
|000039d0| c8 0e 09 0e 5c 6e 5c 22 | 41 40 ae 83 cb c2 42 cc |....\n\"|A@....B.|
|000039e0| 89 89 89 89 89 89 1e 0d | 1e 0e 1e 0f 1e 10 1e 11 |........|........|
|000039f0| 1e 12 1e 13 1e 14 1e 15 | 1e 16 1e 17 0e 16 83 ec |........|........|
|00003a00| 00 65 62 88 d8 d9 cc c7 | 23 88 65 c2 94 7c 88 65 |.eb.....|#.e..|.e|
|00003a10| 62 88 d8 d9 cc c7 23 ab | 86 da db 21 88 aa 73 dc |b.....#.|...!..s.|
|00003a20| 20 88 65 62 88 dd de cc | c7 23 ab dd df cb 21 16 | .eb....|.#....!.|
|00003a30| 0d df e0 21 16 13 df e1 | 21 16 12 df e2 21 16 0f |...!....|!....!..|
|00003a40| e3 df e4 21 e5 51 16 10 | df e6 21 16 11 0e 17 54 |...!.Q..|..!....T|
|00003a50| 16 17 e7 0e 0d 21 ac 4d | 0e 14 89 41 54 a1 e8 0e |.....!.M|...AT...|
|00003a60| 14 41 e9 0e 0f ea 0e 13 | 52 0e 11 0e 12 0e 10 cc |.A......|R.......|
|00003a70| c2 89 0e 0d 26 09 44 0e | 0e 42 16 0e eb 0e 0e 40 |....&.D.|.B.....@|
|00003a80| 41 40 0e 0e 40 5c 22 88 | aa 1c 0e 2c ab 94 0e 17 |A@..@\".|...,....|
|00003a90| 0e 2d 59 ac 8d c4 c5 21 | 0e 06 0b 54 89 13 5c 22 |.-Y....!|...T..\"|
|00003aa0| 84 40 00 cc 89 16 16 84 | 45 00 ee 0e 2c 0e 0e a4 |.@......|E...,...|
|00003ab0| ef 5c 22 89 16 2c 2e 0b | 2a 87 22 20 5b 6e 6e 77 |.\"..,..|*." [nnw|
|00003ac0| 65 62 2d 62 75 66 66 65 | 72 20 65 72 61 73 65 2d |eb-buffe|r erase-|
|00003ad0| 62 75 66 66 65 72 20 30 | 20 70 61 72 74 20 6e 6e |buffer 0| part nn|
|00003ae0| 77 65 62 2d 64 65 66 69 | 6e 69 74 69 6f 6e 20 73 |web-defi|nition s|
|00003af0| 65 61 72 63 68 20 6e 6e | 77 65 62 2d 73 65 61 72 |earch nn|web-sear|
|00003b00| 63 68 20 74 20 61 73 73 | 6f 63 20 6e 6e 77 65 62 |ch t ass|oc nnweb|
|00003b10| 2d 67 72 6f 75 70 20 6e | 6e 77 65 62 2d 67 72 6f |-group n|nweb-gro|
|00003b20| 75 70 2d 61 6c 69 73 74 | 20 31 20 6e 69 6c 20 75 |up-alist| 1 nil u|
|00003b30| 72 6c 20 6d 61 70 20 67 | 72 6f 75 70 20 69 64 20 |rl map g|roup id |
|00003b40| 66 72 6f 6d 20 64 61 74 | 65 20 73 75 62 6a 65 63 |from dat|e subjec|
|00003b50| 74 20 61 63 74 69 76 65 | 20 63 61 73 65 2d 66 6f |t active| case-fo|
|00003b60| 6c 64 2d 73 65 61 72 63 | 68 20 6d 6f 72 65 20 69 |ld-searc|h more i|
|00003b70| 20 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 | search-|forward |
|00003b80| 22 3c 64 74 3e 22 20 72 | 65 70 6c 61 63 65 2d 6d |"<dt>" r|eplace-m|
|00003b90| 61 74 63 68 20 22 5c 6e | 3c 62 6c 75 62 62 3e 22 |atch "\n|<blubb>"|
|00003ba0| 20 6e 6e 77 65 62 2d 64 | 65 63 6f 64 65 2d 65 6e | nnweb-d|ecode-en|
|00003bb0| 74 69 74 69 65 73 20 72 | 65 2d 73 65 61 72 63 68 |tities r|e-search|
|00003bc0| 2d 66 6f 72 77 61 72 64 | 20 22 3c 62 6c 75 62 62 |-forward| "<blubb|
|00003bd0| 3e 2e 2a 68 72 65 66 3d | 5c 22 5c 5c 28 5b 5e 5c |>.*href=|\"\\([^\|
|00003be0| 22 5d 2b 5c 5c 29 5c 22 | 3e 3c 73 74 72 6f 6e 67 |"]+\\)\"|><strong|
|00003bf0| 3e 5c 5c 28 5b 5e 3e 5d | 2a 5c 5c 29 3c 2f 73 74 |>\\([^>]|*\\)</st|
|00003c00| 72 6f 6e 67 3e 3c 2f 61 | 3e 3c 64 64 3e 5c 5c 28 |rong></a|><dd>\\(|
|00003c10| 5b 5e 2d 5d 2b 5c 5c 29 | 2d 20 3c 62 3e 5c 5c 28 |[^-]+\\)|- <b>\\(|
|00003c20| 5b 5e 3c 5d 2b 5c 5c 29 | 3c 2e 2a 68 72 65 66 3d |[^<]+\\)|<.*href=|
|00003c30| 5c 22 6e 65 77 73 3a 5c | 5c 28 5b 5e 5c 22 5d 2b |\"news:\|\([^\"]+|
|00003c40| 5c 5c 29 5c 22 3e 2e 2a | 5c 22 3e 5c 5c 28 2e 2b |\\)\">.*|\">\\(.+|
|00003c50| 5c 5c 29 3c 2f 61 3e 3c | 50 3e 22 20 6d 61 74 63 |\\)</a><|P>" matc|
|00003c60| 68 2d 73 74 72 69 6e 67 | 20 32 20 33 20 34 20 22 |h-string| 2 3 4 "|
|00003c70| 3c 22 20 35 20 22 3e 22 | 20 36 20 6e 6e 77 65 62 |<" 5 ">"| 6 nnweb|
|00003c80| 2d 67 65 74 2d 68 61 73 | 68 74 62 20 6d 61 6b 65 |-get-has|htb make|
|00003c90| 2d 66 75 6c 6c 2d 6d 61 | 69 6c 2d 68 65 61 64 65 |-full-ma|il-heade|
|00003ca0| 72 20 22 28 22 20 22 29 | 20 22 20 6e 6e 77 65 62 |r "(" ")| " nnweb|
|00003cb0| 2d 73 65 74 2d 68 61 73 | 68 74 62 20 6e 6e 77 65 |-set-has|htb nnwe|
|00003cc0| 62 2d 61 72 74 69 63 6c | 65 73 20 6e 6e 77 65 62 |b-articl|es nnweb|
|00003cd0| 2d 6d 61 78 2d 68 69 74 | 73 20 73 6f 72 74 20 23 |-max-hit|s sort #|
|00003ce0| 5b 28 73 31 20 73 32 29 | 20 22 08 40 09 40 57 87 |[(s1 s2)| ".@.@W.|
|00003cf0| 22 20 5b 73 31 20 73 32 | 5d 20 32 5d 5d 20 31 32 |" [s1 s2|] 2]] 12|
|00003d00| 20 28 23 24 20 2e 20 31 | 34 36 37 33 29 5d 29 0a | (#$ . 1|4673)]).|
|00003d10| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 6e 77 65 62 |(defalia|s 'nnweb|
|00003d20| 2d 61 6c 74 61 76 69 73 | 74 61 2d 77 61 73 68 2d |-altavis|ta-wash-|
|00003d30| 61 72 74 69 63 6c 65 20 | 23 5b 6e 69 6c 20 22 65 |article |#[nil "e|
|00003d40| 62 88 c0 19 c2 c3 c4 c0 | 23 ab 85 65 c5 94 7c 88 |b.......|#..e..|.|
|00003d50| 65 62 88 c6 c7 21 ab 8a | c8 c9 c0 5c 22 88 ca 79 |eb...!..|...\"..y|
|00003d60| 88 aa 71 cb cc c4 c0 23 | ab 98 60 ca 79 88 60 7d |..q....#|..`.y.`}|
|00003d70| 88 65 62 88 c2 cd c4 c0 | 23 ab 87 c8 ce c0 5c 22 |.eb.....|#.....\"|
|00003d80| 88 aa 72 7e 88 cf 20 29 | 87 22 20 5b 74 20 63 61 |..r~.. )|." [t ca|
|00003d90| 73 65 2d 66 6f 6c 64 2d | 73 65 61 72 63 68 20 72 |se-fold-|search r|
|00003da0| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|00003db0| 20 22 5e 3c 73 74 72 6f | 6e 67 3e 22 20 6e 69 6c | "^<stro|ng>" nil|
|00003dc0| 20 30 20 6c 6f 6f 6b 69 | 6e 67 2d 61 74 20 22 3c | 0 looki|ng-at "<|
|00003dd0| 73 74 72 6f 6e 67 3e 5c | 5c 28 5b 5e 20 5d 2b 5c |strong>\|\([^ ]+\|
|00003de0| 5c 29 20 2b 3c 2f 73 74 | 72 6f 6e 67 3e 20 2b 5c |\) +</st|rong> +\|
|00003df0| 5c 28 2e 2a 5c 5c 29 24 | 22 20 72 65 70 6c 61 63 |\(.*\\)$|" replac|
|00003e00| 65 2d 6d 61 74 63 68 20 | 22 5c 5c 31 3a 20 5c 5c |e-match |"\\1: \\|
|00003e10| 32 22 20 31 20 72 65 2d | 73 65 61 72 63 68 2d 62 |2" 1 re-|search-b|
|00003e20| 61 63 6b 77 61 72 64 20 | 22 5e 52 65 66 65 72 65 |ackward |"^Refere|
|00003e30| 6e 63 65 73 3a 22 20 22 | 3c 41 2e 2a 5c 5c 3f 69 |nces:" "|<A.*\\?i|
|00003e40| 64 40 5c 5c 28 5b 5e 5c | 22 5d 2b 5c 5c 29 5c 22 |d@\\([^\|"]+\\)\"|
|00003e50| 3e 5b 30 2d 39 5d 2b 3c | 2f 41 3e 22 20 22 26 6c |>[0-9]+<|/A>" "&l|
|00003e60| 74 3b 5c 5c 31 26 67 74 | 3b 20 22 20 6e 6e 77 65 |t;\\1&gt|; " nnwe|
|00003e70| 62 2d 72 65 6d 6f 76 65 | 2d 6d 61 72 6b 75 70 5d |b-remove|-markup]|
|00003e80| 20 34 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 4]).(de|falias '|
|00003e90| 6e 6e 77 65 62 2d 61 6c | 74 61 76 69 73 74 61 2d |nnweb-al|tavista-|
|00003ea0| 73 65 61 72 63 68 20 23 | 5b 28 73 65 61 72 63 68 |search #|[(search|
|00003eb0| 20 26 6f 70 74 69 6f 6e | 61 6c 20 70 61 72 74 29 | &option|al part)|
|00003ec0| 20 22 c0 c1 c2 21 c3 c4 | c5 c6 c7 0e 08 ad 89 c9 | "...!..|........|
|00003ed0| ca 0e 08 cb 5f 21 42 43 | cc cd 0e 0e 42 cf 42 42 |...._!BC|....B.BB|
|00003ee0| 5c 22 42 42 21 51 21 88 | d0 16 11 d2 87 22 20 5b |\"BB!Q!.|....." [|
|00003ef0| 75 72 6c 2d 69 6e 73 65 | 72 74 2d 66 69 6c 65 2d |url-inse|rt-file-|
|00003f00| 63 6f 6e 74 65 6e 74 73 | 20 6e 6e 77 65 62 2d 64 |contents| nnweb-d|
|00003f10| 65 66 69 6e 69 74 69 6f | 6e 20 61 64 64 72 65 73 |efinitio|n addres|
|00003f20| 73 20 22 3f 22 20 6e 6e | 77 65 62 2d 65 6e 63 6f |s "?" nn|web-enco|
|00003f30| 64 65 2d 77 77 77 2d 66 | 6f 72 6d 2d 75 72 6c 65 |de-www-f|orm-urle|
|00003f40| 6e 63 6f 64 65 64 20 28 | 22 70 67 22 20 2e 20 22 |ncoded (|"pg" . "|
|00003f50| 61 71 22 29 20 28 22 77 | 68 61 74 22 20 2e 20 22 |aq") ("w|hat" . "|
|00003f60| 6e 65 77 73 22 29 20 61 | 70 70 65 6e 64 20 70 61 |news") a|ppend pa|
|00003f70| 72 74 20 22 73 74 71 22 | 20 69 6e 74 2d 74 6f 2d |rt "stq"| int-to-|
|00003f80| 73 74 72 69 6e 67 20 33 | 30 20 28 22 66 6d 74 22 |string 3|0 ("fmt"|
|00003f90| 20 2e 20 22 64 22 29 20 | 22 71 22 20 73 65 61 72 | . "d") |"q" sear|
|00003fa0| 63 68 20 28 28 22 72 22 | 20 2e 20 22 22 29 20 28 |ch (("r"| . "") (|
|00003fb0| 22 64 30 22 20 2e 20 22 | 22 29 20 28 22 64 31 22 |"d0" . "|") ("d1"|
|00003fc0| 20 2e 20 22 22 29 29 20 | 6e 69 6c 20 62 75 66 66 | . "")) |nil buff|
|00003fd0| 65 72 2d 66 69 6c 65 2d | 6e 61 6d 65 20 74 5d 20 |er-file-|name t] |
|00003fe0| 31 31 5d 29 0a 28 70 72 | 6f 76 69 64 65 20 27 6e |11]).(pr|ovide 'n|
|00003ff0| 6e 77 65 62 29 0a       |                         |nweb).  |        |
+--------+-------------------------+-------------------------+--------+--------+